home *** CD-ROM | disk | FTP | other *** search
MacBinary | 1992-10-11 | 13.9 KB | [ TEXT/KAHL]
open in: MacOS 8.1
extracted
|
Win98
extracted
|
DOS
extracted
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary ).
You can browse this item here: main.c
Confidence Program Detection Match Type Support
66%
dexvert
Compact Compressed (Unix) (archive/compact)
ext
Supported
10%
dexvert
MacBinary (archive/macBinary)
fallback
Supported
10%
dexvert
Jesper Olsen Module (music/jesperOlsen)
magic
Supported
1%
dexvert
Text File (text/txt)
fallback
Supported
100%
file
MacBinary II, Sun Oct 11 14:30:00 1992, modified Sun Oct 11 14:30:00 1992, creator Think C, type ASCII, 13680 bytes "main.c" , at 0x35f0 340 bytes resource
default (weak)
99%
file
data
default
49%
TrID
Macintosh plain text (MacBinary)
default
33%
TrID
TTComp archive compressed (bin-4K)
default (weak)
16%
TrID
MacBinary 2
default (weak)
100%
siegfried
fmt/1762 MacBinary (II)
default
100%
lsar
MacBinary
default
id metadata key value macFileType [ TEXT] macFileCreator [ KAHL]
hex view +--------+-------------------------+-------------------------+--------+--------+ |00000000| 00 06 6d 61 69 6e 2e 63 | 00 00 00 00 00 00 00 00 |..main.c|........| |00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......| |00000050| 00 00 00 00 00 35 70 00 | 00 01 54 a6 fe 23 28 a6 |.....5p.|..T..#(.| |00000060| fe 23 28 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.#(.....|........| |00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 8c bb 00 00 |........|........| |00000080| 0d 2f 2a a9 20 43 6f 70 | 79 72 69 67 68 74 20 31 |./*. Cop|yright 1| |00000090| 39 39 32 20 55 73 65 72 | 4c 61 6e 64 20 53 6f 66 |992 User|Land Sof| |000000a0| 74 77 61 72 65 2c 20 49 | 6e 63 2e 20 20 41 6c 6c |tware, I|nc. All| |000000b0| 20 52 69 67 68 74 73 20 | 52 65 73 65 72 76 65 64 | Rights |Reserved| |000000c0| 2e 2a 2f 0d 0d 0d 2f 2a | 0d 42 72 69 65 66 6c 79 |.*/.../*|.Briefly| |000000d0| 20 2d 2d 20 74 68 69 73 | 20 69 73 20 61 20 76 65 | -- this| is a ve| |000000e0| 72 79 20 73 6d 61 6c 6c | 20 70 72 6f 67 72 61 6d |ry small| program| |000000f0| 20 74 68 61 74 20 64 65 | 6d 6f 6e 73 74 72 61 74 | that de|monstrat| |00000100| 65 73 20 74 68 65 20 55 | 73 65 72 4c 61 6e 64 20 |es the U|serLand | |00000110| 4f 75 74 6c 69 6e 65 20 | 53 68 61 72 69 6e 67 0d |Outline |Sharing.| |00000120| 70 72 6f 74 6f 63 6f 6c | 2e 20 46 6f 72 20 64 65 |protocol|. For de| |00000130| 74 61 69 6c 65 64 20 69 | 6e 66 6f 2c 20 73 65 65 |tailed i|nfo, see| |00000140| 20 74 68 65 20 65 6e 63 | 6c 6f 73 65 64 20 22 41 | the enc|losed "A| |00000150| 62 6f 75 74 20 4f 75 74 | 6c 69 6e 65 20 53 68 61 |bout Out|line Sha| |00000160| 72 69 6e 67 22 20 66 69 | 6c 65 2e 0d 0d 50 6c 65 |ring" fi|le...Ple| |00000170| 61 73 65 20 63 6f 6e 74 | 61 63 74 20 55 73 65 72 |ase cont|act User| |00000180| 4c 61 6e 64 20 53 6f 66 | 74 77 61 72 65 20 61 74 |Land Sof|tware at| |00000190| 20 6f 6e 20 41 70 70 6c | 65 4c 69 6e 6b 20 61 74 | on Appl|eLink at| |000001a0| 20 74 68 65 20 55 73 65 | 72 4c 61 6e 64 20 44 69 | the Use|rLand Di| |000001b0| 73 63 75 73 73 69 6f 6e | 20 62 6f 61 72 64 20 75 |scussion| board u| |000001c0| 6e 64 65 72 0d 74 68 65 | 20 54 68 69 72 64 20 50 |nder.the| Third P| |000001d0| 61 72 74 69 65 73 20 69 | 63 6f 6e 2c 20 6f 72 20 |arties i|con, or | |000001e0| 47 4f 20 55 53 45 52 4c | 41 4e 44 20 6f 6e 20 43 |GO USERL|AND on C| |000001f0| 6f 6d 70 75 53 65 72 76 | 65 20 66 6f 72 20 66 75 |ompuServ|e for fu| |00000200| 72 74 68 65 72 20 69 6e | 66 6f 72 6d 61 74 69 6f |rther in|formatio| |00000210| 6e 20 6f 6e 20 6f 75 74 | 6c 69 6e 65 20 0d 73 68 |n on out|line .sh| |00000220| 61 72 69 6e 67 2e 20 0d | 0d 57 65 20 68 6f 70 65 |aring. .|.We hope| |00000230| 20 79 6f 75 20 6c 69 6b | 65 20 6f 75 74 6c 69 6e | you lik|e outlin| |00000240| 65 20 73 68 61 72 69 6e | 67 20 61 6e 64 20 61 64 |e sharin|g and ad| |00000250| 64 20 69 74 20 74 6f 20 | 79 6f 75 72 20 4d 61 63 |d it to |your Mac| |00000260| 69 6e 74 6f 73 68 20 61 | 70 70 6c 69 63 61 74 69 |intosh a|pplicati| |00000270| 6f 6e 2e 0d 0d 54 68 61 | 6e 6b 73 21 0d 0d 55 73 |on...Tha|nks!..Us| |00000280| 65 72 4c 61 6e 64 20 53 | 6f 66 74 77 61 72 65 0d |erLand S|oftware.| |00000290| 0d 37 2f 31 2f 39 32 20 | 44 57 3a 20 41 64 64 65 |.7/1/92 |DW: Adde| |000002a0| 64 20 73 75 70 70 6f 72 | 74 20 66 6f 72 20 73 79 |d suppor|t for sy| |000002b0| 73 74 65 6d 20 65 76 65 | 6e 74 20 68 61 6e 64 6c |stem eve|nt handl| |000002c0| 65 72 73 2e 0d 2a 2f 0d | 0d 0d 23 69 6e 63 6c 75 |ers..*/.|..#inclu| |000002d0| 64 65 20 3c 6d 65 6e 75 | 73 68 61 72 69 6e 67 2e |de <menu|sharing.| |000002e0| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 3c 69 61 63 |h>.#incl|ude <iac| |000002f0| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 22 6f 75 |.h>.#inc|lude "ou| |00000300| 74 6c 69 6e 65 73 68 61 | 72 69 6e 67 2e 68 22 0d |tlinesha|ring.h".| |00000310| 0d 0d 23 64 65 66 69 6e | 65 20 61 70 70 6c 65 6d |..#defin|e applem| |00000320| 65 6e 75 20 31 32 38 20 | 2f 2a 74 68 65 20 72 65 |enu 128 |/*the re| |00000330| 73 6f 75 72 63 65 20 69 | 64 20 6f 66 20 74 68 65 |source i|d of the| |00000340| 20 61 70 70 6c 65 20 6d | 65 6e 75 2a 2f 0d 0d 23 | apple m|enu*/..#| |00000350| 64 65 66 69 6e 65 20 61 | 62 6f 75 74 69 74 65 6d |define a|boutitem| |00000360| 20 31 20 2f 2a 74 68 65 | 20 61 62 6f 75 74 20 63 | 1 /*the| about c| |00000370| 6f 6d 6d 61 6e 64 2a 2f | 0d 0d 23 64 65 66 69 6e |ommand*/|..#defin| |00000380| 65 20 66 69 6c 65 6d 65 | 6e 75 20 31 32 39 20 2f |e fileme|nu 129 /| |00000390| 2a 72 65 73 6f 75 72 63 | 65 20 69 64 20 6f 66 20 |*resourc|e id of | |000003a0| 66 69 6c 65 20 6d 65 6e | 75 2c 20 73 68 61 72 65 |file men|u, share| |000003b0| 64 20 6d 65 6e 75 73 20 | 61 70 70 65 61 72 20 74 |d menus |appear t| |000003c0| 6f 20 72 69 67 68 74 20 | 6f 66 20 74 68 69 73 2a |o right |of this*| |000003d0| 2f 0d 0d 23 64 65 66 69 | 6e 65 20 66 69 72 73 74 |/..#defi|ne first| |000003e0| 73 68 61 72 65 64 6d 65 | 6e 75 20 66 69 6c 65 6d |sharedme|nu filem| |000003f0| 65 6e 75 2b 31 20 2f 2a | 72 65 73 6f 75 72 63 65 |enu+1 /*|resource| |00000400| 20 69 64 20 66 6f 72 20 | 66 69 72 73 74 20 73 68 | id for |first sh| |00000410| 61 72 65 64 20 6d 65 6e | 75 2a 2f 0d 0d 23 64 65 |ared men|u*/..#de| |00000420| 66 69 6e 65 20 71 75 69 | 74 69 74 65 6d 20 31 20 |fine qui|titem 1 | |00000430| 2f 2a 74 68 65 20 73 69 | 6e 67 6c 65 20 69 74 65 |/*the si|ngle ite| |00000440| 6d 20 69 6e 20 74 68 65 | 20 66 69 6c 65 20 6d 65 |m in the| file me| |00000450| 6e 75 20 2d 2d 20 74 68 | 69 73 20 69 73 20 61 20 |nu -- th|is is a | |00000460| 76 65 72 79 20 73 69 6d | 70 6c 65 20 70 72 6f 67 |very sim|ple prog| |00000470| 72 61 6d 21 2a 2f 0d 0d | 4d 65 6e 75 48 61 6e 64 |ram!*/..|MenuHand| |00000480| 6c 65 20 68 61 70 70 6c | 65 6d 65 6e 75 2c 20 68 |le happl|emenu, h| |00000490| 66 69 6c 65 6d 65 6e 75 | 3b 20 2f 2a 74 68 65 20 |filemenu|; /*the | |000004a0| 74 77 6f 20 66 69 78 65 | 64 2c 20 6e 6f 6e 2d 73 |two fixe|d, non-s| |000004b0| 68 61 72 65 64 20 6d 65 | 6e 75 73 20 69 6e 20 74 |hared me|nus in t| |000004c0| 68 69 73 20 70 72 6f 67 | 72 61 6d 2a 2f 0d 0d 57 |his prog|ram*/..W| |000004d0| 69 6e 64 6f 77 50 74 72 | 20 6d 61 69 6e 77 69 6e |indowPtr| mainwin| |000004e0| 64 6f 77 20 3d 20 6e 69 | 6c 3b 20 2f 2a 74 68 65 |dow = ni|l; /*the| |000004f0| 20 6d 65 6e 75 20 73 68 | 61 72 69 6e 67 20 74 65 | menu sh|aring te| |00000500| 73 74 20 77 69 6e 64 6f | 77 2a 2f 0d 0d 53 74 72 |st windo|w*/..Str| |00000510| 32 35 35 20 77 69 6e 64 | 6f 77 6d 65 73 73 61 67 |255 wind|owmessag| |00000520| 65 3b 20 2f 2a 74 68 65 | 20 6d 65 73 73 61 67 65 |e; /*the| message| |00000530| 20 74 68 61 74 27 73 20 | 64 69 73 70 6c 61 79 65 | that's |displaye| |00000540| 64 20 69 6e 20 74 68 65 | 20 6d 61 69 6e 20 77 69 |d in the| main wi| |00000550| 6e 64 6f 77 2a 2f 0d 0d | 73 68 6f 72 74 20 66 6c |ndow*/..|short fl| |00000560| 65 78 69 74 6d 61 69 6e | 6c 6f 6f 70 20 3d 20 66 |exitmain|loop = f| |00000570| 61 6c 73 65 3b 20 2f 2a | 77 68 65 6e 20 74 72 75 |alse; /*|when tru| |00000580| 65 20 77 65 20 66 61 6c | 6c 20 74 68 72 75 20 74 |e we fal|l thru t| |00000590| 68 65 20 6d 61 69 6e 20 | 65 76 65 6e 74 20 6c 6f |he main |event lo| |000005a0| 6f 70 2a 2f 0d 09 0d 09 | 0d 0d 0d 73 74 61 74 69 |op*/....|...stati| |000005b0| 63 20 76 6f 69 64 20 63 | 6f 70 79 73 74 72 69 6e |c void c|opystrin| |000005c0| 67 20 28 53 74 72 32 35 | 35 20 73 6f 75 72 63 65 |g (Str25|5 source| |000005d0| 2c 20 53 74 72 32 35 35 | 20 64 65 73 74 29 20 7b |, Str255| dest) {| |000005e0| 0d 0d 09 2f 2a 0d 09 63 | 72 65 61 74 65 20 61 20 |.../*..c|reate a | |000005f0| 63 6f 70 79 20 6f 66 20 | 73 6f 75 72 63 65 20 69 |copy of |source i| |00000600| 6e 20 64 65 73 74 2e 20 | 20 63 6f 70 79 20 74 68 |n dest. | copy th| |00000610| 65 20 6c 65 6e 67 74 68 | 20 62 79 74 65 20 61 6e |e length| byte an| |00000620| 64 0d 09 61 6c 6c 20 74 | 68 65 20 63 68 61 72 61 |d..all t|he chara| |00000630| 63 74 65 72 73 20 69 6e | 20 74 68 65 20 73 6f 75 |cters in| the sou| |00000640| 72 63 65 20 73 74 72 69 | 6e 67 2e 0d 0d 09 61 73 |rce stri|ng....as| |00000650| 73 75 6d 65 20 74 68 65 | 20 73 74 72 69 6e 67 73 |sume the| strings| |00000660| 20 61 72 65 20 70 61 73 | 63 61 6c 20 73 74 72 69 | are pas|cal stri| |00000670| 6e 67 73 2c 20 77 69 74 | 68 20 74 68 65 20 6c 65 |ngs, wit|h the le| |00000680| 6e 67 74 68 20 62 79 74 | 65 20 69 6e 0d 09 74 68 |ngth byt|e in..th| |00000690| 65 20 66 69 72 73 74 20 | 63 68 61 72 61 63 74 65 |e first |characte| |000006a0| 72 20 6f 66 20 74 68 65 | 20 73 74 72 69 6e 67 2e |r of the| string.| |000006b0| 0d 09 2a 2f 0d 0d 09 72 | 65 67 69 73 74 65 72 20 |..*/...r|egister | |000006c0| 73 68 6f 72 74 20 69 2c | 20 6c 65 6e 3b 0d 09 0d |short i,| len;...| |000006d0| 09 6c 65 6e 20 3d 20 28 | 73 68 6f 72 74 29 20 73 |.len = (|short) s| |000006e0| 6f 75 72 63 65 20 5b 30 | 5d 3b 0d 09 0d 09 66 6f |ource [0|];....fo| |000006f0| 72 20 28 69 20 3d 20 30 | 3b 20 69 20 3c 3d 20 6c |r (i = 0|; i <= l| |00000700| 65 6e 3b 20 69 2b 2b 29 | 20 0d 09 09 64 65 73 74 |en; i++)| ...dest| |00000710| 20 5b 69 5d 20 3d 20 73 | 6f 75 72 63 65 20 5b 69 | [i] = s|ource [i| |00000720| 5d 3b 0d 09 7d 20 2f 2a | 63 6f 70 79 73 74 72 69 |];..} /*|copystri| |00000730| 6e 67 2a 2f 0d 0d 0d 73 | 74 61 74 69 63 20 76 6f |ng*/...s|tatic vo| |00000740| 69 64 20 65 6c 6c 69 70 | 73 69 7a 65 20 28 53 74 |id ellip|size (St| |00000750| 72 32 35 35 20 73 2c 20 | 73 68 6f 72 74 20 77 69 |r255 s, |short wi| |00000760| 64 74 68 29 20 7b 0d 0d | 09 2f 2a 0d 09 69 66 20 |dth) {..|./*..if | |00000770| 74 68 65 20 73 74 72 69 | 6e 67 20 66 69 74 73 20 |the stri|ng fits | |00000780| 69 6e 73 69 64 65 20 74 | 68 65 20 67 69 76 65 6e |inside t|he given| |00000790| 20 6e 75 6d 62 65 72 20 | 6f 66 20 70 69 78 65 6c | number |of pixel| |000007a0| 73 2c 20 66 69 6e 65 20 | 2d 2d 20 64 6f 20 6e 6f |s, fine |-- do no| |000007b0| 74 68 69 6e 67 0d 09 61 | 6e 64 20 72 65 74 75 72 |thing..a|nd retur| |000007c0| 6e 2e 0d 09 0d 09 69 66 | 20 6e 6f 74 2c 20 72 65 |n.....if| not, re| |000007d0| 74 75 72 6e 20 61 20 73 | 74 72 69 6e 67 20 74 68 |turn a s|tring th| |000007e0| 61 74 20 64 6f 65 73 20 | 66 69 74 2c 20 77 69 74 |at does |fit, wit| |000007f0| 68 20 65 6c 6c 69 70 73 | 65 73 20 72 65 70 72 65 |h ellips|es repre| |00000800| 73 65 6e 74 69 6e 67 20 | 74 68 65 20 0d 09 64 65 |senting |the ..de| |00000810| 6c 65 74 65 64 20 63 68 | 61 72 61 63 74 65 72 73 |leted ch|aracters| |00000820| 2e 20 20 65 6c 6c 69 70 | 73 65 73 20 61 72 65 20 |. ellip|ses are | |00000830| 67 65 6e 65 72 61 74 65 | 64 20 62 79 20 70 72 65 |generate|d by pre| |00000840| 73 73 69 6e 67 20 6f 70 | 74 69 6f 6e 2d 73 65 6d |ssing op|tion-sem| |00000850| 69 63 6f 6c 6f 6e 2e 0d | 09 2a 2f 0d 09 0d 09 72 |icolon..|.*/....r| |00000860| 65 67 69 73 74 65 72 20 | 63 68 61 72 20 6c 65 6e |egister |char len| |00000870| 3b 0d 09 72 65 67 69 73 | 74 65 72 20 73 68 6f 72 |;..regis|ter shor| |00000880| 74 20 6e 65 77 77 69 64 | 74 68 3b 0d 09 0d 09 69 |t newwid|th;....i| |00000890| 66 20 28 28 6e 65 77 77 | 69 64 74 68 20 3d 20 53 |f ((neww|idth = S| |000008a0| 74 72 69 6e 67 57 69 64 | 74 68 20 28 73 29 29 20 |tringWid|th (s)) | |000008b0| 3c 3d 20 77 69 64 74 68 | 29 20 2f 2a 6e 6f 74 68 |<= width|) /*noth| |000008c0| 69 6e 67 20 74 6f 20 64 | 6f 2c 20 74 68 65 20 73 |ing to d|o, the s| |000008d0| 74 72 69 6e 67 20 66 69 | 74 73 2a 2f 0d 09 09 72 |tring fi|ts*/...r| |000008e0| 65 74 75 72 6e 3b 0d 09 | 0d 09 6c 65 6e 20 3d 20 |eturn;..|..len = | |000008f0| 73 20 5b 30 5d 3b 20 2f | 2a 20 63 75 72 72 65 6e |s [0]; /|* curren| |00000900| 74 20 6c 65 6e 67 74 68 | 20 69 6e 20 63 68 61 72 |t length| in char| |00000910| 61 63 74 65 72 73 2a 2f | 0d 09 0d 09 77 69 64 74 |acters*/|....widt| |00000920| 68 20 2d 3d 20 43 68 61 | 72 57 69 64 74 68 20 28 |h -= Cha|rWidth (| |00000930| 27 c9 27 29 3b 20 2f 2a | 20 73 75 62 74 72 61 63 |'.'); /*| subtrac| |00000940| 74 20 77 69 64 74 68 20 | 6f 66 20 65 6c 6c 69 70 |t width |of ellip| |00000950| 73 65 73 2a 2f 0d 09 09 | 0d 09 64 6f 20 7b 20 2f |ses*/...|..do { /| |00000960| 2a 75 6e 74 69 6c 20 69 | 74 20 66 69 74 73 20 28 |*until i|t fits (| |00000970| 6f 72 20 77 65 20 72 75 | 6e 20 6f 75 74 20 6f 66 |or we ru|n out of| |00000980| 20 63 68 61 72 61 63 74 | 65 72 73 29 2a 2f 0d 09 | charact|ers)*/..| |00000990| 0d 09 09 6e 65 77 77 69 | 64 74 68 20 2d 3d 20 43 |...newwi|dth -= C| |000009a0| 68 61 72 57 69 64 74 68 | 20 28 73 20 5b 6c 65 6e |harWidth| (s [len| |000009b0| 5d 29 3b 0d 09 09 0d 09 | 09 2d 2d 6c 65 6e 3b 0d |]);.....|.--len;.| |000009c0| 09 7d 20 77 68 69 6c 65 | 20 28 28 6e 65 77 77 69 |.} while| ((newwi| |000009d0| 64 74 68 20 3e 20 77 69 | 64 74 68 29 20 26 26 20 |dth > wi|dth) && | |000009e0| 28 6c 65 6e 20 21 3d 20 | 30 29 29 3b 0d 09 0d 09 |(len != |0));....| |000009f0| 2b 2b 6c 65 6e 3b 20 2f | 2a 6d 61 6b 65 20 72 6f |++len; /|*make ro| |00000a00| 6f 6d 20 66 6f 72 20 74 | 68 65 20 65 6c 6c 69 70 |om for t|he ellip| |00000a10| 73 65 73 2a 2f 0d 09 0d | 09 73 20 5b 6c 65 6e 5d |ses*/...|.s [len]| |00000a20| 20 3d 20 27 c9 27 3b 20 | 0d 09 0d 09 73 20 5b 30 | = '.'; |....s [0| |00000a30| 5d 20 3d 20 28 63 68 61 | 72 29 20 6c 65 6e 3b 0d |] = (cha|r) len;.| |00000a40| 09 7d 20 2f 2a 65 6c 6c | 69 70 73 69 7a 65 2a 2f |.} /*ell|ipsize*/| |00000a50| 0d 0d 0d 73 74 61 74 69 | 63 20 76 6f 69 64 20 63 |...stati|c void c| |00000a60| 65 6e 74 65 72 73 74 72 | 69 6e 67 20 28 52 65 63 |enterstr|ing (Rec| |00000a70| 74 20 72 2c 20 53 74 72 | 32 35 35 20 73 29 20 7b |t r, Str|255 s) {| |00000a80| 0d 09 0d 09 2f 2a 0d 09 | 64 72 61 77 20 74 68 65 |..../*..|draw the| |00000a90| 20 73 74 72 69 6e 67 20 | 69 6e 20 74 68 65 20 63 | string |in the c| |00000aa0| 75 72 72 65 6e 74 20 66 | 6f 6e 74 2c 20 73 69 7a |urrent f|ont, siz| |00000ab0| 65 20 61 6e 64 20 73 74 | 79 6c 65 2c 20 63 65 6e |e and st|yle, cen| |00000ac0| 74 65 72 65 64 20 69 6e | 73 69 64 65 0d 09 74 68 |tered in|side..th| |00000ad0| 65 20 69 6e 64 69 63 61 | 74 65 64 20 72 65 63 74 |e indica|ted rect| |00000ae0| 61 6e 67 6c 65 2e 0d 09 | 2a 2f 0d 09 0d 09 72 65 |angle...|*/....re| |00000af0| 67 69 73 74 65 72 20 73 | 68 6f 72 74 20 72 68 20 |gister s|hort rh | |00000b00| 3d 20 72 2e 62 6f 74 74 | 6f 6d 20 2d 20 72 2e 74 |= r.bott|om - r.t| |00000b10| 6f 70 3b 0d 09 72 65 67 | 69 73 74 65 72 20 73 68 |op;..reg|ister sh| |00000b20| 6f 72 74 20 72 77 20 3d | 20 72 2e 72 69 67 68 74 |ort rw =| r.right| |00000b30| 20 2d 20 72 2e 6c 65 66 | 74 3b 0d 09 72 65 67 69 | - r.lef|t;..regi| |00000b40| 73 74 65 72 20 73 68 6f | 72 74 20 68 2c 20 76 3b |ster sho|rt h, v;| |00000b50| 0d 09 46 6f 6e 74 49 6e | 66 6f 20 66 69 3b 0d 09 |..FontIn|fo fi;..| |00000b60| 0d 09 47 65 74 46 6f 6e | 74 49 6e 66 6f 20 28 26 |..GetFon|tInfo (&| |00000b70| 66 69 29 3b 0d 09 0d 09 | 65 6c 6c 69 70 73 69 7a |fi);....|ellipsiz| |00000b80| 65 20 28 73 2c 20 72 77 | 29 3b 20 2f 2a 6d 61 6b |e (s, rw|); /*mak| |00000b90| 65 20 73 75 72 65 20 69 | 74 20 66 69 74 73 20 69 |e sure i|t fits i| |00000ba0| 6e 73 69 64 65 20 74 68 | 65 20 72 65 63 74 61 6e |nside th|e rectan| |00000bb0| 67 6c 65 2c 20 77 69 64 | 74 68 2d 77 69 73 65 2a |gle, wid|th-wise*| |00000bc0| 2f 0d 09 0d 09 68 20 3d | 20 72 2e 6c 65 66 74 20 |/....h =| r.left | |00000bd0| 2b 20 28 28 72 77 20 2d | 20 53 74 72 69 6e 67 57 |+ ((rw -| StringW| |00000be0| 69 64 74 68 20 28 73 29 | 29 20 2f 20 32 29 3b 0d |idth (s)|) / 2);.| |00000bf0| 09 0d 09 76 20 3d 20 72 | 2e 74 6f 70 20 2b 20 28 |...v = r|.top + (| |00000c00| 28 72 68 20 2d 20 28 66 | 69 2e 61 73 63 65 6e 74 |(rh - (f|i.ascent| |00000c10| 20 2b 20 66 69 2e 64 65 | 73 63 65 6e 74 29 29 20 | + fi.de|scent)) | |00000c20| 2f 20 32 29 20 2b 20 66 | 69 2e 61 73 63 65 6e 74 |/ 2) + f|i.ascent| |00000c30| 3b 0d 09 0d 09 4d 6f 76 | 65 54 6f 20 28 68 2c 20 |;....Mov|eTo (h, | |00000c40| 76 29 3b 0d 09 0d 09 43 | 6c 69 70 52 65 63 74 20 |v);....C|lipRect | |00000c50| 28 26 72 29 3b 0d 09 0d | 09 44 72 61 77 53 74 72 |(&r);...|.DrawStr| |00000c60| 69 6e 67 20 28 73 29 3b | 0d 09 7d 20 2f 2a 63 65 |ing (s);|..} /*ce| |00000c70| 6e 74 65 72 73 74 72 69 | 6e 67 2a 2f 0d 0d 0d 73 |nterstri|ng*/...s| |00000c80| 74 61 74 69 63 20 76 6f | 69 64 20 73 65 74 66 6f |tatic vo|id setfo| |00000c90| 6e 74 73 69 7a 65 73 74 | 79 6c 65 20 28 73 68 6f |ntsizest|yle (sho| |00000ca0| 72 74 20 66 6f 6e 74 6e | 75 6d 2c 20 73 68 6f 72 |rt fontn|um, shor| |00000cb0| 74 20 66 6f 6e 74 73 69 | 7a 65 2c 20 73 68 6f 72 |t fontsi|ze, shor| |00000cc0| 74 20 66 6f 6e 74 73 74 | 79 6c 65 29 20 7b 0d 0d |t fontst|yle) {..| |00000cd0| 09 54 65 78 74 46 6f 6e | 74 20 28 66 6f 6e 74 6e |.TextFon|t (fontn| |00000ce0| 75 6d 29 3b 0d 09 0d 09 | 54 65 78 74 53 69 7a 65 |um);....|TextSize| |00000cf0| 20 28 66 6f 6e 74 73 69 | 7a 65 29 3b 0d 09 0d 09 | (fontsi|ze);....| |00000d00| 54 65 78 74 46 61 63 65 | 20 28 66 6f 6e 74 73 74 |TextFace| (fontst| |00000d10| 79 6c 65 29 3b 0d 09 7d | 20 2f 2a 73 65 74 66 6f |yle);..}| /*setfo| |00000d20| 6e 74 73 69 7a 65 73 74 | 79 6c 65 2a 2f 0d 09 0d |ntsizest|yle*/...| |00000d30| 09 0d 73 74 61 74 69 63 | 20 76 6f 69 64 20 75 70 |..static| void up| |00000d40| 64 61 74 65 6d 61 69 6e | 77 69 6e 64 6f 77 20 28 |datemain|window (| |00000d50| 76 6f 69 64 29 20 7b 0d | 09 0d 09 52 65 63 74 20 |void) {.|...Rect | |00000d60| 72 3b 0d 09 53 74 72 32 | 35 35 20 73 3b 0d 09 0d |r;..Str2|55 s;...| |00000d70| 09 72 20 3d 20 28 2a 6d | 61 69 6e 77 69 6e 64 6f |.r = (*m|ainwindo| |00000d80| 77 29 2e 70 6f 72 74 52 | 65 63 74 3b 0d 09 0d 09 |w).portR|ect;....| |00000d90| 45 72 61 73 65 52 65 63 | 74 20 28 26 72 29 3b 0d |EraseRec|t (&r);.| |00000da0| 09 0d 09 73 65 74 66 6f | 6e 74 73 69 7a 65 73 74 |...setfo|ntsizest| |00000db0| 79 6c 65 20 28 68 65 6c | 76 65 74 69 63 61 2c 20 |yle (hel|vetica, | |00000dc0| 31 32 2c 20 30 29 3b 0d | 09 0d 09 63 65 6e 74 65 |12, 0);.|...cente| |00000dd0| 72 73 74 72 69 6e 67 20 | 28 72 2c 20 77 69 6e 64 |rstring |(r, wind| |00000de0| 6f 77 6d 65 73 73 61 67 | 65 29 3b 0d 09 0d 09 4e |owmessag|e);....N| |00000df0| 75 6d 54 6f 53 74 72 69 | 6e 67 20 28 46 72 65 65 |umToStri|ng (Free| |00000e00| 4d 65 6d 20 28 29 20 2f | 20 31 30 32 34 2c 20 73 |Mem () /| 1024, s| |00000e10| 29 3b 0d 09 0d 09 4d 6f | 76 65 54 6f 20 28 72 2e |);....Mo|veTo (r.| |00000e20| 6c 65 66 74 20 2b 20 33 | 2c 20 72 2e 62 6f 74 74 |left + 3|, r.bott| |00000e30| 6f 6d 20 2d 20 33 29 3b | 0d 09 0d 09 73 65 74 66 |om - 3);|....setf| |00000e40| 6f 6e 74 73 69 7a 65 73 | 74 79 6c 65 20 28 67 65 |ontsizes|tyle (ge| |00000e50| 6e 65 76 61 2c 20 39 2c | 20 30 29 3b 0d 09 0d 09 |neva, 9,| 0);....| |00000e60| 44 72 61 77 53 74 72 69 | 6e 67 20 28 73 29 3b 0d |DrawStri|ng (s);.| |00000e70| 09 0d 09 44 72 61 77 53 | 74 72 69 6e 67 20 28 22 |...DrawS|tring ("| |00000e80| 5c 70 4b 22 29 3b 0d 09 | 7d 20 2f 2a 75 70 64 61 |\pK");..|} /*upda| |00000e90| 74 65 6d 61 69 6e 77 69 | 6e 64 6f 77 2a 2f 0d 09 |temainwi|ndow*/..| |00000ea0| 0d 09 0d 73 74 61 74 69 | 63 20 42 6f 6f 6c 65 61 |...stati|c Boolea| |00000eb0| 6e 20 73 65 74 77 69 6e | 64 6f 77 6d 65 73 73 61 |n setwin|dowmessa| |00000ec0| 67 65 20 28 53 74 72 32 | 35 35 20 73 29 20 7b 0d |ge (Str2|55 s) {.| |00000ed0| 09 0d 09 63 6f 70 79 73 | 74 72 69 6e 67 20 28 73 |...copys|tring (s| |00000ee0| 2c 20 77 69 6e 64 6f 77 | 6d 65 73 73 61 67 65 29 |, window|message)| |00000ef0| 3b 0d 09 0d 09 53 65 74 | 50 6f 72 74 20 28 6d 61 |;....Set|Port (ma| |00000f00| 69 6e 77 69 6e 64 6f 77 | 29 3b 0d 09 0d 09 75 70 |inwindow|);....up| |00000f10| 64 61 74 65 6d 61 69 6e | 77 69 6e 64 6f 77 20 28 |datemain|window (| |00000f20| 29 3b 0d 09 0d 09 72 65 | 74 75 72 6e 20 28 74 72 |);....re|turn (tr| |00000f30| 75 65 29 3b 0d 09 7d 20 | 2f 2a 73 65 74 77 69 6e |ue);..} |/*setwin| |00000f40| 64 6f 77 6d 65 73 73 61 | 67 65 2a 2f 0d 0d 0d 73 |dowmessa|ge*/...s| |00000f50| 74 61 74 69 63 20 42 6f | 6f 6c 65 61 6e 20 69 6e |tatic Bo|olean in| |00000f60| 69 74 6d 61 69 6e 77 69 | 6e 64 6f 77 20 28 76 6f |itmainwi|ndow (vo| |00000f70| 69 64 29 20 7b 0d 09 0d | 09 72 65 67 69 73 74 65 |id) {...|.registe| |00000f80| 72 20 57 69 6e 64 6f 77 | 50 74 72 20 77 3b 0d 09 |r Window|Ptr w;..| |00000f90| 0d 09 77 20 3d 20 6d 61 | 69 6e 77 69 6e 64 6f 77 |..w = ma|inwindow| |00000fa0| 20 3d 20 47 65 74 4e 65 | 77 57 69 6e 64 6f 77 20 | = GetNe|wWindow | |00000fb0| 28 31 32 38 2c 20 6e 69 | 6c 2c 20 28 57 69 6e 64 |(128, ni|l, (Wind| |00000fc0| 6f 77 50 74 72 29 20 2d | 31 29 3b 0d 09 0d 09 69 |owPtr) -|1);....i| |00000fd0| 66 20 28 77 20 3d 3d 20 | 6e 69 6c 29 0d 09 09 72 |f (w == |nil)...r| |00000fe0| 65 74 75 72 6e 20 28 66 | 61 6c 73 65 29 3b 0d 09 |eturn (f|alse);..| |00000ff0| 0d 09 53 68 6f 77 57 69 | 6e 64 6f 77 20 28 77 29 |..ShowWi|ndow (w)| |00001000| 3b 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 74 72 75 |;....ret|urn (tru| |00001010| 65 29 3b 0d 09 7d 20 2f | 2a 69 6e 69 74 6d 61 69 |e);..} /|*initmai| |00001020| 6e 77 69 6e 64 6f 77 2a | 2f 0d 0d 0d 73 74 61 74 |nwindow*|/...stat| |00001030| 69 63 20 76 6f 69 64 20 | 68 61 6e 64 6c 65 75 70 |ic void |handleup| |00001040| 64 61 74 65 20 28 45 76 | 65 6e 74 52 65 63 6f 72 |date (Ev|entRecor| |00001050| 64 20 2a 65 76 29 20 7b | 0d 09 0d 09 72 65 67 69 |d *ev) {|....regi| |00001060| 73 74 65 72 20 57 69 6e | 64 6f 77 50 74 72 20 77 |ster Win|dowPtr w| |00001070| 3b 0d 09 0d 09 77 20 3d | 20 28 57 69 6e 64 6f 77 |;....w =| (Window| |00001080| 50 74 72 29 20 28 2a 65 | 76 29 2e 6d 65 73 73 61 |Ptr) (*e|v).messa| |00001090| 67 65 3b 0d 09 0d 09 42 | 65 67 69 6e 55 70 64 61 |ge;....B|eginUpda| |000010a0| 74 65 20 28 77 29 3b 0d | 09 0d 09 53 65 74 50 6f |te (w);.|...SetPo| |000010b0| 72 74 20 28 77 29 3b 0d | 09 0d 09 75 70 64 61 74 |rt (w);.|...updat| |000010c0| 65 6d 61 69 6e 77 69 6e | 64 6f 77 20 28 29 3b 0d |emainwin|dow ();.| |000010d0| 09 0d 09 45 6e 64 55 70 | 64 61 74 65 20 28 77 29 |...EndUp|date (w)| |000010e0| 3b 0d 09 7d 20 2f 2a 68 | 61 6e 64 6c 65 75 70 64 |;..} /*h|andleupd| |000010f0| 61 74 65 2a 2f 0d 0d 0d | 73 74 61 74 69 63 20 76 |ate*/...|static v| |00001100| 6f 69 64 20 68 61 6e 64 | 6c 65 64 72 61 67 20 28 |oid hand|ledrag (| |00001110| 45 76 65 6e 74 52 65 63 | 6f 72 64 20 2a 65 76 2c |EventRec|ord *ev,| |00001120| 20 57 69 6e 64 6f 77 50 | 74 72 20 77 29 20 7b 0d | WindowP|tr w) {.| |00001130| 09 0d 09 52 65 63 74 20 | 72 3b 0d 0d 09 72 20 3d |...Rect |r;...r =| |00001140| 20 71 64 2e 73 63 72 65 | 65 6e 42 69 74 73 2e 62 | qd.scre|enBits.b| |00001150| 6f 75 6e 64 73 3b 20 0d | 09 0d 09 72 2e 74 6f 70 |ounds; .|...r.top| |00001160| 20 3d 20 72 2e 74 6f 70 | 20 2b 20 47 65 74 4d 42 | = r.top| + GetMB| |00001170| 61 72 48 65 69 67 68 74 | 20 28 29 3b 20 0d 09 0d |arHeight| (); ...| |00001180| 09 49 6e 73 65 74 52 65 | 63 74 20 28 26 72 2c 20 |.InsetRe|ct (&r, | |00001190| 34 2c 20 34 29 3b 0d 09 | 0d 09 44 72 61 67 57 69 |4, 4);..|..DragWi| |000011a0| 6e 64 6f 77 20 28 77 2c | 20 28 2a 65 76 29 2e 77 |ndow (w,| (*ev).w| |000011b0| 68 65 72 65 2c 20 26 72 | 29 3b 0d 09 7d 20 2f 2a |here, &r|);..} /*| |000011c0| 68 61 6e 64 6c 65 64 72 | 61 67 2a 2f 0d 0d 0d 73 |handledr|ag*/...s| |000011d0| 74 61 74 69 63 20 76 6f | 69 64 20 68 61 6e 64 6c |tatic vo|id handl| |000011e0| 65 6d 65 6e 75 20 28 6c | 6f 6e 67 20 63 6f 64 65 |emenu (l|ong code| |000011f0| 77 6f 72 64 29 20 7b 0d | 09 0d 09 72 65 67 69 73 |word) {.|...regis| |00001200| 74 65 72 20 73 68 6f 72 | 74 20 69 64 6d 65 6e 75 |ter shor|t idmenu| |00001210| 2c 20 69 64 69 74 65 6d | 3b 0d 09 0d 09 69 64 69 |, iditem|;....idi| |00001220| 74 65 6d 20 3d 20 4c 6f | 57 6f 72 64 20 28 63 6f |tem = Lo|Word (co| |00001230| 64 65 77 6f 72 64 29 3b | 0d 09 0d 09 69 64 6d 65 |deword);|....idme| |00001240| 6e 75 20 3d 20 48 69 57 | 6f 72 64 20 28 63 6f 64 |nu = HiW|ord (cod| |00001250| 65 77 6f 72 64 29 3b 0d | 09 0d 09 69 66 20 28 53 |eword);.|...if (S| |00001260| 68 61 72 65 64 4d 65 6e | 75 48 69 74 20 28 69 64 |haredMen|uHit (id| |00001270| 6d 65 6e 75 2c 20 69 64 | 69 74 65 6d 29 29 0d 09 |menu, id|item))..| |00001280| 09 67 6f 74 6f 20 65 78 | 69 74 3b 0d 09 0d 09 73 |.goto ex|it;....s| |00001290| 77 69 74 63 68 20 28 69 | 64 6d 65 6e 75 29 20 7b |witch (i|dmenu) {| |000012a0| 0d 09 0d 09 09 63 61 73 | 65 20 61 70 70 6c 65 6d |.....cas|e applem| |000012b0| 65 6e 75 3a 20 0d 09 09 | 09 73 77 69 74 63 68 20 |enu: ...|.switch | |000012c0| 28 69 64 69 74 65 6d 29 | 20 7b 0d 09 09 09 09 0d |(iditem)| {......| |000012d0| 09 09 09 09 63 61 73 65 | 20 61 62 6f 75 74 69 74 |....case| aboutit| |000012e0| 65 6d 3a 0d 09 09 09 09 | 09 41 6c 65 72 74 20 28 |em:.....|.Alert (| |000012f0| 32 36 32 2c 20 6e 69 6c | 29 3b 0d 09 09 09 09 09 |262, nil|);......| |00001300| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....| |00001310| 0d 09 09 09 09 64 65 66 | 61 75 6c 74 3a 20 7b 0d |.....def|ault: {.| |00001320| 09 09 09 09 0d 09 09 09 | 09 09 53 74 72 32 35 35 |........|..Str255| |00001330| 20 73 3b 0d 09 09 09 09 | 09 0d 09 09 09 09 09 47 | s;.....|.......G| |00001340| 65 74 49 74 65 6d 20 28 | 68 61 70 70 6c 65 6d 65 |etItem (|happleme| |00001350| 6e 75 2c 20 69 64 69 74 | 65 6d 2c 20 73 29 3b 0d |nu, idit|em, s);.| |00001360| 09 09 09 09 09 0d 09 09 | 09 09 09 4f 70 65 6e 44 |........|...OpenD| |00001370| 65 73 6b 41 63 63 20 28 | 73 29 3b 0d 09 09 09 09 |eskAcc (|s);.....| |00001380| 09 0d 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |.......b|reak;...| |00001390| 09 09 09 7d 0d 09 09 09 | 09 7d 20 2f 2a 73 77 69 |...}....|.} /*swi| |000013a0| 74 63 68 2a 2f 0d 09 09 | 09 0d 09 09 09 62 72 65 |tch*/...|.....bre| |000013b0| 61 6b 3b 20 2f 2a 61 70 | 70 6c 65 20 6d 65 6e 75 |ak; /*ap|ple menu| |000013c0| 2a 2f 0d 0d 09 09 63 61 | 73 65 20 66 69 6c 65 6d |*/....ca|se filem| |000013d0| 65 6e 75 3a 20 0d 09 09 | 09 73 77 69 74 63 68 20 |enu: ...|.switch | |000013e0| 28 69 64 69 74 65 6d 29 | 20 7b 0d 09 09 09 09 0d |(iditem)| {......| |000013f0| 09 09 09 09 63 61 73 65 | 20 71 75 69 74 69 74 65 |....case| quitite| |00001400| 6d 3a 0d 09 09 09 09 0d | 09 09 09 09 09 66 6c 65 |m:......|.....fle| |00001410| 78 69 74 6d 61 69 6e 6c | 6f 6f 70 20 3d 20 74 72 |xitmainl|oop = tr| |00001420| 75 65 3b 0d 09 09 09 09 | 09 0d 09 09 09 09 09 62 |ue;.....|.......b| |00001430| 72 65 61 6b 3b 0d 09 09 | 09 09 7d 20 2f 2a 73 77 |reak;...|..} /*sw| |00001440| 69 74 63 68 2a 2f 0d 09 | 09 09 0d 09 09 09 62 72 |itch*/..|......br| |00001450| 65 61 6b 3b 20 2f 2a 66 | 69 6c 65 20 6d 65 6e 75 |eak; /*f|ile menu| |00001460| 2a 2f 0d 09 09 09 0d 09 | 09 7d 20 2f 2a 73 77 69 |*/......|.} /*swi| |00001470| 74 63 68 69 6e 67 20 6f | 6e 20 77 68 69 63 68 20 |tching o|n which | |00001480| 6d 65 6e 75 20 77 61 73 | 20 69 6e 76 6f 6b 65 64 |menu was| invoked| |00001490| 2a 2f 0d 09 09 0d 09 65 | 78 69 74 3a 0d 09 0d 09 |*/.....e|xit:....| |000014a0| 48 69 6c 69 74 65 4d 65 | 6e 75 20 28 30 29 3b 0d |HiliteMe|nu (0);.| |000014b0| 09 7d 20 2f 2a 68 61 6e | 64 6c 65 6d 65 6e 75 2a |.} /*han|dlemenu*| |000014c0| 2f 0d 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |/...stat|ic void | |000014d0| 68 61 6e 64 6c 65 6d 6f | 75 73 65 20 28 45 76 65 |handlemo|use (Eve| |000014e0| 6e 74 52 65 63 6f 72 64 | 20 2a 65 76 29 20 7b 0d |ntRecord| *ev) {.| |000014f0| 0d 09 72 65 67 69 73 74 | 65 72 20 73 68 6f 72 74 |..regist|er short| |00001500| 20 70 61 72 74 3b 0d 09 | 57 69 6e 64 6f 77 50 74 | part;..|WindowPt| |00001510| 72 20 77 3b 0d 09 0d 09 | 70 61 72 74 20 3d 20 46 |r w;....|part = F| |00001520| 69 6e 64 57 69 6e 64 6f | 77 20 28 28 2a 65 76 29 |indWindo|w ((*ev)| |00001530| 2e 77 68 65 72 65 2c 20 | 26 77 29 3b 0d 09 0d 09 |.where, |&w);....| |00001540| 69 66 20 28 77 20 21 3d | 20 6e 69 6c 29 20 0d 09 |if (w !=| nil) ..| |00001550| 0d 09 09 69 66 20 28 77 | 20 21 3d 20 46 72 6f 6e |...if (w| != Fron| |00001560| 74 57 69 6e 64 6f 77 20 | 28 29 29 20 7b 20 2f 2a |tWindow |()) { /*| |00001570| 6a 75 73 74 20 6c 69 6b | 65 20 61 6c 6c 20 6f 74 |just lik|e all ot| |00001580| 68 65 72 20 4d 61 63 20 | 70 72 6f 67 72 61 6d 73 |her Mac |programs| |00001590| 2a 2f 0d 09 09 09 0d 09 | 09 09 53 65 6c 65 63 74 |*/......|..Select| |000015a0| 57 69 6e 64 6f 77 20 28 | 77 29 3b 0d 09 09 09 09 |Window (|w);.....| |000015b0| 09 09 09 0d 09 09 09 72 | 65 74 75 72 6e 3b 20 2f |.......r|eturn; /| |000015c0| 2a 74 68 65 20 6d 6f 75 | 73 65 20 63 6c 69 63 6b |*the mou|se click| |000015d0| 20 69 73 20 63 6f 6e 73 | 75 6d 65 64 20 62 79 20 | is cons|umed by | |000015e0| 74 68 65 20 62 72 69 6e | 67 74 6f 66 72 6f 6e 74 |the brin|gtofront| |000015f0| 20 6f 70 65 72 61 74 69 | 6f 6e 2a 2f 0d 09 09 09 | operati|on*/....| |00001600| 7d 0d 09 0d 09 73 77 69 | 74 63 68 20 28 70 61 72 |}....swi|tch (par| |00001610| 74 29 20 7b 0d 09 0d 09 | 09 63 61 73 65 20 69 6e |t) {....|.case in| |00001620| 4d 65 6e 75 42 61 72 3a | 20 0d 09 09 09 68 61 6e |MenuBar:| ....han| |00001630| 64 6c 65 6d 65 6e 75 20 | 28 4d 65 6e 75 53 65 6c |dlemenu |(MenuSel| |00001640| 65 63 74 20 28 28 2a 65 | 76 29 2e 77 68 65 72 65 |ect ((*e|v).where| |00001650| 29 29 3b 20 0d 09 09 09 | 0d 09 09 09 62 72 65 61 |)); ....|....brea| |00001660| 6b 3b 0d 09 09 0d 09 09 | 63 61 73 65 20 69 6e 53 |k;......|case inS| |00001670| 79 73 57 69 6e 64 6f 77 | 3a 0d 09 09 09 53 79 73 |ysWindow|:....Sys| |00001680| 74 65 6d 43 6c 69 63 6b | 20 28 65 76 2c 20 77 29 |temClick| (ev, w)| |00001690| 3b 20 0d 09 09 09 0d 09 | 09 09 62 72 65 61 6b 3b |; ......|..break;| |000016a0| 0d 09 09 0d 09 09 63 61 | 73 65 20 69 6e 44 72 61 |......ca|se inDra| |000016b0| 67 3a 0d 09 09 09 68 61 | 6e 64 6c 65 64 72 61 67 |g:....ha|ndledrag| |000016c0| 20 28 65 76 2c 20 77 29 | 3b 0d 09 09 09 0d 09 09 | (ev, w)|;.......| |000016d0| 09 62 72 65 61 6b 3b 0d | 09 09 09 0d 09 09 7d 20 |.break;.|......} | |000016e0| 2f 2a 73 77 69 74 63 68 | 2a 2f 0d 09 7d 20 2f 2a |/*switch|*/..} /*| |000016f0| 68 61 6e 64 6c 65 6d 6f | 75 73 65 2a 2f 0d 0d 0d |handlemo|use*/...| |00001700| 73 74 61 74 69 63 20 76 | 6f 69 64 20 68 61 6e 64 |static v|oid hand| |00001710| 6c 65 6b 65 79 73 74 72 | 6f 6b 65 20 28 45 76 65 |lekeystr|oke (Eve| |00001720| 6e 74 52 65 63 6f 72 64 | 20 2a 65 76 29 20 7b 0d |ntRecord| *ev) {.| |00001730| 0d 09 72 65 67 69 73 74 | 65 72 20 63 68 61 72 20 |..regist|er char | |00001740| 63 68 20 3d 20 28 2a 65 | 76 29 2e 6d 65 73 73 61 |ch = (*e|v).messa| |00001750| 67 65 20 26 20 63 68 61 | 72 43 6f 64 65 4d 61 73 |ge & cha|rCodeMas| |00001760| 6b 3b 0d 09 0d 09 69 66 | 20 28 53 68 61 72 65 64 |k;....if| (Shared| |00001770| 53 63 72 69 70 74 52 75 | 6e 6e 69 6e 67 20 28 29 |ScriptRu|nning ()| |00001780| 29 20 7b 20 2f 2a 63 6d | 64 2d 70 65 72 69 6f 64 |) { /*cm|d-period| |00001790| 20 74 65 72 6d 69 6e 61 | 74 65 73 20 74 68 65 20 | termina|tes the | |000017a0| 73 63 72 69 70 74 2a 2f | 0d 09 0d 09 09 69 66 20 |script*/|.....if | |000017b0| 28 28 28 2a 65 76 29 2e | 6d 6f 64 69 66 69 65 72 |(((*ev).|modifier| |000017c0| 73 20 26 20 63 6d 64 4b | 65 79 29 20 26 26 20 28 |s & cmdK|ey) && (| |000017d0| 63 68 20 3d 3d 20 27 2e | 27 29 29 20 7b 20 0d 09 |ch == '.|')) { ..| |000017e0| 09 09 0d 09 09 09 43 61 | 6e 63 65 6c 53 68 61 72 |......Ca|ncelShar| |000017f0| 65 64 53 63 72 69 70 74 | 20 28 29 3b 20 2f 2a 63 |edScript| (); /*c| |00001800| 61 6e 63 65 6c 20 74 68 | 65 20 73 68 61 72 65 64 |ancel th|e shared| |00001810| 20 6d 65 6e 75 20 73 63 | 72 69 70 74 2c 20 69 66 | menu sc|ript, if| |00001820| 20 6f 6e 65 20 69 73 20 | 72 75 6e 6e 69 6e 67 2a | one is |running*| |00001830| 2f 0d 09 09 0d 09 09 09 | 72 65 74 75 72 6e 3b 0d |/.......|return;.| |00001840| 09 09 09 7d 0d 09 09 7d | 0d 09 0d 09 68 61 6e 64 |...}...}|....hand| |00001850| 6c 65 6d 65 6e 75 20 28 | 4d 65 6e 75 4b 65 79 20 |lemenu (|MenuKey | |00001860| 28 63 68 29 29 3b 20 2f | 2a 6e 6f 74 20 63 6d 64 |(ch)); /|*not cmd| |00001870| 2d 70 65 72 69 6f 64 2c | 20 70 72 6f 63 65 73 73 |-period,| process| |00001880| 20 74 68 65 20 6e 6f 72 | 6d 61 6c 20 77 61 79 2a | the nor|mal way*| |00001890| 2f 0d 09 7d 20 2f 2a 68 | 61 6e 64 6c 65 6b 65 79 |/..} /*h|andlekey| |000018a0| 73 74 72 6f 6b 65 2a 2f | 0d 0d 0d 73 74 61 74 69 |stroke*/|...stati| |000018b0| 63 20 76 6f 69 64 20 68 | 61 6e 64 6c 65 65 76 65 |c void h|andleeve| |000018c0| 6e 74 20 28 45 76 65 6e | 74 52 65 63 6f 72 64 20 |nt (Even|tRecord | |000018d0| 2a 65 76 29 20 7b 0d 09 | 0d 09 73 77 69 74 63 68 |*ev) {..|..switch| |000018e0| 20 28 28 2a 65 76 29 2e | 77 68 61 74 29 20 7b 0d | ((*ev).|what) {.| |000018f0| 09 0d 09 09 63 61 73 65 | 20 6b 65 79 44 6f 77 6e |....case| keyDown| |00001900| 3a 20 63 61 73 65 20 61 | 75 74 6f 4b 65 79 3a 20 |: case a|utoKey: | |00001910| 0d 09 09 09 68 61 6e 64 | 6c 65 6b 65 79 73 74 72 |....hand|lekeystr| |00001920| 6f 6b 65 20 28 65 76 29 | 3b 0d 09 09 09 0d 09 09 |oke (ev)|;.......| |00001930| 09 62 72 65 61 6b 3b 0d | 09 09 09 0d 09 09 63 61 |.break;.|......ca| |00001940| 73 65 20 6d 6f 75 73 65 | 44 6f 77 6e 3a 0d 09 09 |se mouse|Down:...| |00001950| 09 68 61 6e 64 6c 65 6d | 6f 75 73 65 20 28 65 76 |.handlem|ouse (ev| |00001960| 29 3b 0d 09 09 09 0d 09 | 09 09 62 72 65 61 6b 3b |);......|..break;| |00001970| 0d 09 09 0d 09 09 63 61 | 73 65 20 75 70 64 61 74 |......ca|se updat| |00001980| 65 45 76 74 3a 0d 09 09 | 09 68 61 6e 64 6c 65 75 |eEvt:...|.handleu| |00001990| 70 64 61 74 65 20 28 65 | 76 29 3b 0d 09 09 09 0d |pdate (e|v);.....| |000019a0| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 0d 09 09 |...break|;.......| |000019b0| 63 61 73 65 20 6b 48 69 | 67 68 4c 65 76 65 6c 45 |case kHi|ghLevelE| |000019c0| 76 65 6e 74 3a 0d 09 09 | 09 41 45 50 72 6f 63 65 |vent:...|.AEProce| |000019d0| 73 73 41 70 70 6c 65 45 | 76 65 6e 74 20 28 65 76 |ssAppleE|vent (ev| |000019e0| 29 3b 0d 09 09 09 0d 09 | 09 09 62 72 65 61 6b 3b |);......|..break;| |000019f0| 0d 09 09 7d 20 2f 2a 73 | 77 69 74 63 68 2a 2f 0d |...} /*s|witch*/.| |00001a00| 09 7d 20 2f 2a 68 61 6e | 64 6c 65 65 76 65 6e 74 |.} /*han|dleevent| |00001a10| 2a 2f 0d 0d 0d 73 74 61 | 74 69 63 20 76 6f 69 64 |*/...sta|tic void| |00001a20| 20 6d 61 69 6e 65 76 65 | 6e 74 6c 6f 6f 70 20 28 | maineve|ntloop (| |00001a30| 76 6f 69 64 29 20 7b 0d | 09 0d 09 45 76 65 6e 74 |void) {.|...Event| |00001a40| 52 65 63 6f 72 64 20 65 | 76 3b 0d 09 0d 09 77 68 |Record e|v;....wh| |00001a50| 69 6c 65 20 28 21 66 6c | 65 78 69 74 6d 61 69 6e |ile (!fl|exitmain| |00001a60| 6c 6f 6f 70 29 20 7b 0d | 09 09 0d 09 09 69 66 20 |loop) {.|.....if | |00001a70| 28 57 61 69 74 4e 65 78 | 74 45 76 65 6e 74 20 28 |(WaitNex|tEvent (| |00001a80| 65 76 65 72 79 45 76 65 | 6e 74 2c 20 26 65 76 2c |everyEve|nt, &ev,| |00001a90| 20 31 2c 20 6e 69 6c 29 | 29 20 0d 09 09 09 68 61 | 1, nil)|) ....ha| |00001aa0| 6e 64 6c 65 65 76 65 6e | 74 20 28 26 65 76 29 3b |ndleeven|t (&ev);| |00001ab0| 0d 09 09 0d 09 09 43 68 | 65 63 6b 53 68 61 72 65 |......Ch|eckShare| |00001ac0| 64 4d 65 6e 75 73 20 28 | 66 69 72 73 74 73 68 61 |dMenus (|firstsha| |00001ad0| 72 65 64 6d 65 6e 75 29 | 3b 20 0d 09 09 7d 20 2f |redmenu)|; ...} /| |00001ae0| 2a 77 68 69 6c 65 2a 2f | 0d 09 7d 20 2f 2a 6d 61 |*while*/|..} /*ma| |00001af0| 69 6e 65 76 65 6e 74 6c | 6f 6f 70 2a 2f 0d 0d 0d |ineventl|oop*/...| |00001b00| 73 74 61 74 69 63 20 76 | 6f 69 64 20 69 6e 69 74 |static v|oid init| |00001b10| 6d 65 6e 75 73 20 28 76 | 6f 69 64 29 20 7b 0d 09 |menus (v|oid) {..| |00001b20| 0d 09 2f 2a 0d 09 73 65 | 74 20 75 70 20 6f 75 72 |../*..se|t up our| |00001b30| 20 61 70 70 6c 65 20 61 | 6e 64 20 66 69 6c 65 20 | apple a|nd file | |00001b40| 6d 65 6e 75 73 2e 20 20 | 6e 6f 74 68 69 6e 67 20 |menus. |nothing | |00001b50| 66 61 6e 63 79 2e 0d 09 | 2a 2f 0d 09 0d 09 68 61 |fancy...|*/....ha| |00001b60| 70 70 6c 65 6d 65 6e 75 | 20 3d 20 47 65 74 4d 65 |pplemenu| = GetMe| |00001b70| 6e 75 20 28 61 70 70 6c | 65 6d 65 6e 75 29 3b 20 |nu (appl|emenu); | |00001b80| 0d 09 0d 09 41 64 64 52 | 65 73 4d 65 6e 75 20 28 |....AddR|esMenu (| |00001b90| 68 61 70 70 6c 65 6d 65 | 6e 75 2c 20 27 44 52 56 |happleme|nu, 'DRV| |00001ba0| 52 27 29 3b 20 0d 09 0d | 09 49 6e 73 65 72 74 4d |R'); ...|.InsertM| |00001bb0| 65 6e 75 20 28 68 61 70 | 70 6c 65 6d 65 6e 75 2c |enu (hap|plemenu,| |00001bc0| 20 30 29 3b 20 0d 09 0d | 09 68 66 69 6c 65 6d 65 | 0); ...|.hfileme| |00001bd0| 6e 75 20 3d 20 47 65 74 | 4d 65 6e 75 20 28 66 69 |nu = Get|Menu (fi| |00001be0| 6c 65 6d 65 6e 75 29 3b | 20 0d 09 0d 09 49 6e 73 |lemenu);| ....Ins| |00001bf0| 65 72 74 4d 65 6e 75 20 | 28 68 66 69 6c 65 6d 65 |ertMenu |(hfileme| |00001c00| 6e 75 2c 20 30 29 3b 0d | 09 0d 09 44 72 61 77 4d |nu, 0);.|...DrawM| |00001c10| 65 6e 75 42 61 72 20 28 | 29 3b 0d 09 7d 20 2f 2a |enuBar (|);..} /*| |00001c20| 69 6e 69 74 6d 65 6e 75 | 73 2a 2f 0d 0d 0d 73 74 |initmenu|s*/...st| |00001c30| 61 74 69 63 20 76 6f 69 | 64 20 69 6e 69 74 6d 61 |atic voi|d initma| |00001c40| 63 69 6e 74 6f 73 68 20 | 28 76 6f 69 64 29 20 7b |cintosh |(void) {| |00001c50| 0d 0d 09 2f 2a 0d 09 74 | 68 65 20 6d 61 67 69 63 |.../*..t|he magic| |00001c60| 20 73 74 75 66 66 20 74 | 68 61 74 20 65 76 65 72 | stuff t|hat ever| |00001c70| 79 20 4d 61 63 69 6e 74 | 6f 73 68 20 61 70 70 6c |y Macint|osh appl| |00001c80| 69 63 61 74 69 6f 6e 20 | 6e 65 65 64 73 20 74 6f |ication |needs to| |00001c90| 20 64 6f 20 0d 09 62 65 | 66 6f 72 65 20 64 6f 69 | do ..be|fore doi| |00001ca0| 6e 67 20 61 6e 79 74 68 | 69 6e 67 20 65 6c 73 65 |ng anyth|ing else| |00001cb0| 2e 0d 09 2a 2f 0d 0d 09 | 72 65 67 69 73 74 65 72 |...*/...|register| |00001cc0| 20 73 68 6f 72 74 20 69 | 3b 0d 09 09 0d 09 4d 61 | short i|;.....Ma| |00001cd0| 78 41 70 70 6c 5a 6f 6e | 65 20 28 29 3b 0d 09 0d |xApplZon|e ();...| |00001ce0| 09 66 6f 72 20 28 69 20 | 3d 20 30 3b 20 69 20 3c |.for (i |= 0; i <| |00001cf0| 20 31 30 3b 20 69 2b 2b | 29 20 0d 09 09 4d 6f 72 | 10; i++|) ...Mor| |00001d00| 65 4d 61 73 74 65 72 73 | 20 28 29 3b 0d 09 0d 09 |eMasters| ();....| |00001d10| 49 6e 69 74 47 72 61 66 | 20 28 26 71 64 2e 74 68 |InitGraf| (&qd.th| |00001d20| 65 50 6f 72 74 29 3b 0d | 09 0d 09 49 6e 69 74 46 |ePort);.|...InitF| |00001d30| 6f 6e 74 73 20 28 29 3b | 0d 09 0d 09 46 6c 75 73 |onts ();|....Flus| |00001d40| 68 45 76 65 6e 74 73 20 | 28 65 76 65 72 79 45 76 |hEvents |(everyEv| |00001d50| 65 6e 74 2c 20 30 29 3b | 0d 09 0d 09 49 6e 69 74 |ent, 0);|....Init| |00001d60| 57 69 6e 64 6f 77 73 20 | 28 29 3b 0d 09 0d 09 49 |Windows |();....I| |00001d70| 6e 69 74 4d 65 6e 75 73 | 20 28 29 3b 0d 09 0d 09 |nitMenus| ();....| |00001d80| 54 45 49 6e 69 74 20 28 | 29 3b 0d 09 0d 09 49 6e |TEInit (|);....In| |00001d90| 69 74 44 69 61 6c 6f 67 | 73 20 28 6e 69 6c 29 3b |itDialog|s (nil);| |00001da0| 0d 09 0d 09 49 6e 69 74 | 43 75 72 73 6f 72 20 28 |....Init|Cursor (| |00001db0| 29 3b 0d 09 0d 09 66 6f | 72 20 28 69 20 3d 20 30 |);....fo|r (i = 0| |00001dc0| 3b 20 69 20 3c 20 35 3b | 20 69 2b 2b 29 20 7b 20 |; i < 5;| i++) { | |00001dd0| 2f 2a 72 65 67 69 73 74 | 65 72 20 77 69 74 68 20 |/*regist|er with | |00001de0| 4d 75 6c 74 69 66 69 6e | 64 65 72 2a 2f 0d 09 09 |Multifin|der*/...| |00001df0| 0d 09 09 45 76 65 6e 74 | 52 65 63 6f 72 64 20 65 |...Event|Record e| |00001e00| 76 3b 0d 09 09 0d 09 09 | 45 76 65 6e 74 41 76 61 |v;......|EventAva| |00001e10| 69 6c 20 28 65 76 65 72 | 79 45 76 65 6e 74 2c 20 |il (ever|yEvent, | |00001e20| 26 65 76 29 3b 20 2f 2a | 73 65 65 20 54 4e 31 38 |&ev); /*|see TN18| |00001e30| 30 20 2d 2d 20 73 70 6c | 61 73 68 20 73 63 72 65 |0 -- spl|ash scre| |00001e40| 65 6e 2a 2f 0d 09 09 7d | 20 2f 2a 66 6f 72 2a 2f |en*/...}| /*for*/| |00001e50| 0d 09 7d 20 2f 2a 69 6e | 69 74 6d 61 63 69 6e 74 |..} /*in|itmacint| |00001e60| 6f 73 68 2a 2f 0d 0d 0d | 73 74 61 74 69 63 20 70 |osh*/...|static p| |00001e70| 61 73 63 61 6c 20 4f 53 | 45 72 72 20 68 61 6e 64 |ascal OS|Err hand| |00001e80| 6c 65 71 75 69 74 20 28 | 65 76 65 6e 74 2c 20 72 |lequit (|event, r| |00001e90| 65 70 6c 79 2c 20 72 65 | 66 63 6f 6e 29 20 41 45 |eply, re|fcon) AE| |00001ea0| 44 65 73 63 4c 69 73 74 | 20 2a 65 76 65 6e 74 2c |DescList| *event,| |00001eb0| 20 2a 72 65 70 6c 79 3b | 20 6c 6f 6e 67 20 72 65 | *reply;| long re| |00001ec0| 66 63 6f 6e 3b 20 7b 0d | 09 0d 09 2f 2a 44 65 62 |fcon; {.|.../*Deb| |00001ed0| 75 67 53 74 72 20 28 22 | 5c 70 71 75 69 74 61 70 |ugStr ("|\pquitap| |00001ee0| 70 22 29 3b 2a 2f 0d 09 | 0d 09 66 6c 65 78 69 74 |p");*/..|..flexit| |00001ef0| 6d 61 69 6e 6c 6f 6f 70 | 20 3d 20 74 72 75 65 3b |mainloop| = true;| |00001f00| 0d 09 0d 09 72 65 74 75 | 72 6e 20 28 6e 6f 45 72 |....retu|rn (noEr| |00001f10| 72 29 3b 0d 09 7d 20 2f | 2a 68 61 6e 64 6c 65 71 |r);..} /|*handleq| |00001f20| 75 69 74 2a 2f 0d 09 0d | 09 0d 73 74 61 74 69 63 |uit*/...|..static| |00001f30| 20 70 61 73 63 61 6c 20 | 4f 53 45 72 72 20 68 61 | pascal |OSErr ha| |00001f40| 6e 64 6c 65 6f 70 65 6e | 61 70 70 20 28 65 76 65 |ndleopen|app (eve| |00001f50| 6e 74 2c 20 72 65 70 6c | 79 2c 20 72 65 66 63 6f |nt, repl|y, refco| |00001f60| 6e 29 20 41 45 44 65 73 | 63 4c 69 73 74 20 2a 65 |n) AEDes|cList *e| |00001f70| 76 65 6e 74 2c 20 2a 72 | 65 70 6c 79 3b 20 6c 6f |vent, *r|eply; lo| |00001f80| 6e 67 20 72 65 66 63 6f | 6e 3b 20 7b 0d 09 0d 09 |ng refco|n; {....| |00001f90| 2f 2a 44 65 62 75 67 53 | 74 72 20 28 22 5c 70 6f |/*DebugS|tr ("\po| |00001fa0| 70 65 6e 61 70 70 22 29 | 3b 2a 2f 0d 09 0d 09 72 |penapp")|;*/....r| |00001fb0| 65 74 75 72 6e 20 28 6e | 6f 45 72 72 29 3b 0d 09 |eturn (n|oErr);..| |00001fc0| 7d 20 2f 2a 68 61 6e 64 | 6c 65 6f 70 65 6e 61 70 |} /*hand|leopenap| |00001fd0| 70 2a 2f 0d 0d 0d 73 74 | 61 74 69 63 20 70 61 73 |p*/...st|atic pas| |00001fe0| 63 61 6c 20 42 6f 6f 6c | 65 61 6e 20 6f 70 65 6e |cal Bool|ean open| |00001ff0| 66 69 6c 65 73 70 65 63 | 20 28 66 73 29 20 46 53 |filespec| (fs) FS| |00002000| 53 70 65 63 20 2a 66 73 | 3b 20 7b 0d 0d 09 2f 2a |Spec *fs|; {.../*| |00002010| 44 65 62 75 67 53 74 72 | 20 28 28 2a 66 73 29 2e |DebugStr| ((*fs).| |00002020| 6e 61 6d 65 29 3b 2a 2f | 0d 09 0d 09 72 65 74 75 |name);*/|....retu| |00002030| 72 6e 20 28 74 72 75 65 | 29 3b 0d 09 7d 20 2f 2a |rn (true|);..} /*| |00002040| 6f 70 65 6e 66 69 6c 65 | 73 70 65 63 2a 2f 0d 09 |openfile|spec*/..| |00002050| 0d 0d 73 74 61 74 69 63 | 20 70 61 73 63 61 6c 20 |..static| pascal | |00002060| 42 6f 6f 6c 65 61 6e 20 | 70 72 69 6e 74 66 69 6c |Boolean |printfil| |00002070| 65 73 70 65 63 20 28 66 | 73 29 20 46 53 53 70 65 |espec (f|s) FSSpe| |00002080| 63 20 2a 66 73 3b 20 7b | 0d 0d 09 2f 2a 44 65 62 |c *fs; {|.../*Deb| |00002090| 75 67 53 74 72 20 28 28 | 2a 66 73 29 2e 6e 61 6d |ugStr ((|*fs).nam| |000020a0| 65 29 3b 2a 2f 0d 09 0d | 09 72 65 74 75 72 6e 20 |e);*/...|.return | |000020b0| 28 74 72 75 65 29 3b 0d | 09 7d 20 2f 2a 70 72 69 |(true);.|.} /*pri| |000020c0| 6e 74 66 69 6c 65 73 70 | 65 63 2a 2f 0d 09 0d 0d |ntfilesp|ec*/....| |000020d0| 73 74 61 74 69 63 20 70 | 61 73 63 61 6c 20 4f 53 |static p|ascal OS| |000020e0| 45 72 72 20 68 61 6e 64 | 6c 65 6f 70 65 6e 20 28 |Err hand|leopen (| |000020f0| 41 70 70 6c 65 45 76 65 | 6e 74 20 2a 65 76 65 6e |AppleEve|nt *even| |00002100| 74 2c 20 41 70 70 6c 65 | 45 76 65 6e 74 20 2a 72 |t, Apple|Event *r| |00002110| 65 70 6c 79 2c 20 6c 6f | 6e 67 20 72 65 66 63 6f |eply, lo|ng refco| |00002120| 6e 29 20 7b 0d 09 0d 09 | 49 41 43 67 6c 6f 62 61 |n) {....|IACgloba| |00002130| 6c 73 2e 65 76 65 6e 74 | 20 3d 20 65 76 65 6e 74 |ls.event| = event| |00002140| 3b 0d 09 0d 09 49 41 43 | 67 6c 6f 62 61 6c 73 2e |;....IAC|globals.| |00002150| 72 65 70 6c 79 20 3d 20 | 72 65 70 6c 79 3b 0d 09 |reply = |reply;..| |00002160| 0d 09 49 41 43 67 6c 6f | 62 61 6c 73 2e 72 65 66 |..IACglo|bals.ref| |00002170| 63 6f 6e 20 3d 20 72 65 | 66 63 6f 6e 3b 0d 09 0d |con = re|fcon;...| |00002180| 09 72 65 74 75 72 6e 20 | 28 49 41 43 64 72 69 76 |.return |(IACdriv| |00002190| 65 66 69 6c 65 6c 69 73 | 74 20 28 26 6f 70 65 6e |efilelis|t (&open| |000021a0| 66 69 6c 65 73 70 65 63 | 29 29 3b 0d 09 7d 20 2f |filespec|));..} /| |000021b0| 2a 68 61 6e 64 6c 65 6f | 70 65 6e 2a 2f 0d 09 0d |*handleo|pen*/...| |000021c0| 09 09 0d 73 74 61 74 69 | 63 20 70 61 73 63 61 6c |...stati|c pascal| |000021d0| 20 4f 53 45 72 72 20 68 | 61 6e 64 6c 65 70 72 69 | OSErr h|andlepri| |000021e0| 6e 74 20 28 65 76 65 6e | 74 2c 20 72 65 70 6c 79 |nt (even|t, reply| |000021f0| 2c 20 72 65 66 63 6f 6e | 29 20 41 45 44 65 73 63 |, refcon|) AEDesc| |00002200| 4c 69 73 74 20 2a 65 76 | 65 6e 74 2c 20 2a 72 65 |List *ev|ent, *re| |00002210| 70 6c 79 3b 20 6c 6f 6e | 67 20 72 65 66 63 6f 6e |ply; lon|g refcon| |00002220| 3b 20 7b 0d 09 0d 09 49 | 41 43 67 6c 6f 62 61 6c |; {....I|ACglobal| |00002230| 73 2e 65 76 65 6e 74 20 | 3d 20 65 76 65 6e 74 3b |s.event |= event;| |00002240| 0d 09 0d 09 49 41 43 67 | 6c 6f 62 61 6c 73 2e 72 |....IACg|lobals.r| |00002250| 65 70 6c 79 20 3d 20 72 | 65 70 6c 79 3b 0d 09 0d |eply = r|eply;...| |00002260| 09 49 41 43 67 6c 6f 62 | 61 6c 73 2e 72 65 66 63 |.IACglob|als.refc| |00002270| 6f 6e 20 3d 20 72 65 66 | 63 6f 6e 3b 0d 09 0d 09 |on = ref|con;....| |00002280| 72 65 74 75 72 6e 20 28 | 49 41 43 64 72 69 76 65 |return (|IACdrive| |00002290| 66 69 6c 65 6c 69 73 74 | 20 28 26 70 72 69 6e 74 |filelist| (&print| |000022a0| 66 69 6c 65 73 70 65 63 | 29 29 3b 0d 09 7d 20 2f |filespec|));..} /| |000022b0| 2a 68 61 6e 64 6c 65 70 | 72 69 6e 74 2a 2f 0d 09 |*handlep|rint*/..| |000022c0| 0d 09 09 0d 73 74 61 74 | 69 63 20 70 61 73 63 61 |....stat|ic pasca| |000022d0| 6c 20 4f 53 45 72 72 20 | 73 65 74 6d 65 73 73 61 |l OSErr |setmessa| |000022e0| 67 65 76 65 72 62 20 28 | 41 70 70 6c 65 45 76 65 |geverb (|AppleEve| |000022f0| 6e 74 20 2a 65 76 65 6e | 74 2c 20 41 70 70 6c 65 |nt *even|t, Apple| |00002300| 45 76 65 6e 74 20 2a 72 | 65 70 6c 79 2c 20 6c 6f |Event *r|eply, lo| |00002310| 6e 67 20 72 65 66 63 6f | 6e 29 20 7b 0d 09 0d 09 |ng refco|n) {....| |00002320| 2f 2a 0d 09 64 69 73 70 | 6c 61 79 20 61 20 6d 65 |/*..disp|lay a me| |00002330| 73 73 61 67 65 20 69 6e | 20 4f 75 74 6c 69 6e 65 |ssage in| Outline| |00002340| 53 68 61 72 65 72 27 73 | 20 77 69 6e 64 6f 77 2e |Sharer's| window.| |00002350| 0d 09 2a 2f 0d 0d 09 53 | 74 72 32 35 35 20 73 3b |..*/...S|tr255 s;| |00002360| 0d 09 0d 09 69 66 20 28 | 53 68 61 72 65 64 53 63 |....if (|SharedSc| |00002370| 72 69 70 74 43 61 6e 63 | 65 6c 6c 65 64 20 28 65 |riptCanc|elled (e| |00002380| 76 65 6e 74 2c 20 72 65 | 70 6c 79 29 29 20 0d 09 |vent, re|ply)) ..| |00002390| 09 72 65 74 75 72 6e 20 | 28 6e 6f 45 72 72 29 3b |.return |(noErr);| |000023a0| 0d 09 0d 09 49 41 43 67 | 6c 6f 62 61 6c 73 2e 65 |....IACg|lobals.e| |000023b0| 76 65 6e 74 20 3d 20 65 | 76 65 6e 74 3b 0d 09 0d |vent = e|vent;...| |000023c0| 09 49 41 43 67 6c 6f 62 | 61 6c 73 2e 72 65 70 6c |.IACglob|als.repl| |000023d0| 79 20 3d 20 72 65 70 6c | 79 3b 0d 09 0d 09 69 66 |y = repl|y;....if| |000023e0| 20 28 21 49 41 43 67 65 | 74 73 74 72 69 6e 67 70 | (!IACge|tstringp| |000023f0| 61 72 61 6d 20 28 28 4f | 53 54 79 70 65 29 20 6b |aram ((O|SType) k| |00002400| 65 79 44 69 72 65 63 74 | 4f 62 6a 65 63 74 2c 20 |eyDirect|Object, | |00002410| 73 29 29 0d 09 09 72 65 | 74 75 72 6e 20 28 6e 6f |s))...re|turn (no| |00002420| 45 72 72 29 3b 0d 09 0d | 09 49 41 43 72 65 74 75 |Err);...|.IACretu| |00002430| 72 6e 62 6f 6f 6c 65 61 | 6e 20 28 73 65 74 77 69 |rnboolea|n (setwi| |00002440| 6e 64 6f 77 6d 65 73 73 | 61 67 65 20 28 73 29 29 |ndowmess|age (s))| |00002450| 3b 0d 09 0d 09 72 65 74 | 75 72 6e 20 28 6e 6f 45 |;....ret|urn (noE| |00002460| 72 72 29 3b 0d 09 7d 20 | 2f 2a 73 65 74 6d 65 73 |rr);..} |/*setmes| |00002470| 73 61 67 65 76 65 72 62 | 2a 2f 0d 09 0d 0d 73 74 |sageverb|*/....st| |00002480| 61 74 69 63 20 70 61 73 | 63 61 6c 20 4f 53 45 72 |atic pas|cal OSEr| |00002490| 72 20 73 65 74 6f 75 74 | 6c 69 6e 65 76 65 72 62 |r setout|lineverb| |000024a0| 20 28 41 70 70 6c 65 45 | 76 65 6e 74 20 2a 65 76 | (AppleE|vent *ev| |000024b0| 65 6e 74 2c 20 41 70 70 | 6c 65 45 76 65 6e 74 20 |ent, App|leEvent | |000024c0| 2a 72 65 70 6c 79 2c 20 | 6c 6f 6e 67 20 72 65 66 |*reply, |long ref| |000024d0| 63 6f 6e 29 20 7b 0d 09 | 0d 09 2f 2a 0d 09 73 65 |con) {..|../*..se| |000024e0| 74 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6f 75 |t the cu|rrent ou| |000024f0| 74 6c 69 6e 65 20 66 72 | 6f 6d 20 74 68 65 20 6f |tline fr|om the o| |00002500| 75 74 6c 69 6e 65 20 70 | 61 72 61 6d 65 74 65 72 |utline p|arameter| |00002510| 20 70 61 73 73 65 64 20 | 61 73 20 70 61 72 74 0d | passed |as part.| |00002520| 09 6f 66 20 74 68 65 20 | 41 70 70 6c 65 20 45 76 |.of the |Apple Ev| |00002530| 65 6e 74 2e 0d 09 2a 2f | 0d 0d 09 68 64 6c 6f 75 |ent...*/|...hdlou| |00002540| 74 6c 69 6e 65 72 65 63 | 6f 72 64 20 68 6f 75 74 |tlinerec|ord hout| |00002550| 6c 69 6e 65 3b 0d 09 09 | 0d 09 69 66 20 28 53 68 |line;...|..if (Sh| |00002560| 61 72 65 64 53 63 72 69 | 70 74 43 61 6e 63 65 6c |aredScri|ptCancel| |00002570| 6c 65 64 20 28 65 76 65 | 6e 74 2c 20 72 65 70 6c |led (eve|nt, repl| |00002580| 79 29 29 20 0d 09 09 72 | 65 74 75 72 6e 20 28 6e |y)) ...r|eturn (n| |00002590| 6f 45 72 72 29 3b 0d 09 | 0d 09 49 41 43 67 6c 6f |oErr);..|..IACglo| |000025a0| 62 61 6c 73 2e 65 76 65 | 6e 74 20 3d 20 65 76 65 |bals.eve|nt = eve| |000025b0| 6e 74 3b 0d 09 0d 09 49 | 41 43 67 6c 6f 62 61 6c |nt;....I|ACglobal| |000025c0| 73 2e 72 65 70 6c 79 20 | 3d 20 72 65 70 6c 79 3b |s.reply |= reply;| |000025d0| 0d 09 0d 09 69 66 20 28 | 21 49 41 43 67 65 74 6f |....if (|!IACgeto| |000025e0| 75 74 6c 69 6e 65 70 61 | 72 61 6d 20 28 28 4f 53 |utlinepa|ram ((OS| |000025f0| 54 79 70 65 29 20 6b 65 | 79 44 69 72 65 63 74 4f |Type) ke|yDirectO| |00002600| 62 6a 65 63 74 2c 20 26 | 68 6f 75 74 6c 69 6e 65 |bject, &|houtline| |00002610| 29 29 0d 09 09 72 65 74 | 75 72 6e 20 28 6e 6f 45 |))...ret|urn (noE| |00002620| 72 72 29 3b 0d 09 09 0d | 09 6f 70 44 69 73 70 6f |rr);....|.opDispo| |00002630| 73 65 4f 75 74 6c 69 6e | 65 52 65 63 6f 72 64 20 |seOutlin|eRecord | |00002640| 28 6f 75 74 6c 69 6e 65 | 64 61 74 61 29 3b 20 2f |(outline|data); /| |00002650| 2a 6f 6e 6c 79 20 6f 6e | 65 20 6f 75 74 6c 69 6e |*only on|e outlin| |00002660| 65 20 6d 61 6e 61 67 65 | 64 20 61 74 20 61 20 74 |e manage|d at a t| |00002670| 69 6d 65 2a 2f 0d 09 0d | 09 6f 75 74 6c 69 6e 65 |ime*/...|.outline| |00002680| 64 61 74 61 20 3d 20 68 | 6f 75 74 6c 69 6e 65 3b |data = h|outline;| |00002690| 20 2f 2a 73 65 74 20 74 | 68 65 20 63 75 72 72 65 | /*set t|he curre| |000026a0| 6e 74 20 6f 75 74 6c 69 | 6e 65 2a 2f 0d 09 0d 09 |nt outli|ne*/....| |000026b0| 49 41 43 72 65 74 75 72 | 6e 62 6f 6f 6c 65 61 6e |IACretur|nboolean| |000026c0| 20 28 74 72 75 65 29 3b | 0d 09 0d 09 72 65 74 75 | (true);|....retu| |000026d0| 72 6e 20 28 6e 6f 45 72 | 72 29 3b 0d 09 7d 20 2f |rn (noEr|r);..} /| |000026e0| 2a 73 65 74 6f 75 74 6c | 69 6e 65 76 65 72 62 2a |*setoutl|ineverb*| |000026f0| 2f 0d 09 0d 09 0d 73 74 | 61 74 69 63 20 42 6f 6f |/.....st|atic Boo| |00002700| 6c 65 61 6e 20 6e 6f 6f | 75 74 6c 69 6e 65 65 72 |lean noo|utlineer| |00002710| 72 6f 72 20 28 76 6f 69 | 64 29 20 7b 0d 0d 09 69 |ror (voi|d) {...i| |00002720| 66 20 28 6f 75 74 6c 69 | 6e 65 64 61 74 61 20 3d |f (outli|nedata =| |00002730| 3d 20 6e 69 6c 29 20 7b | 0d 09 09 0d 09 09 49 41 |= nil) {|......IA| |00002740| 43 72 65 74 75 72 6e 65 | 72 72 6f 72 20 28 31 2c |Creturne|rror (1,| |00002750| 20 22 5c 70 4e 6f 20 6f | 75 74 6c 69 6e 65 20 68 | "\pNo o|utline h| |00002760| 61 73 20 62 65 65 6e 20 | 73 65 6e 74 20 74 6f 20 |as been |sent to | |00002770| 4f 75 74 6c 69 6e 65 53 | 68 61 72 65 72 22 29 3b |OutlineS|harer");| |00002780| 0d 09 09 0d 09 09 72 65 | 74 75 72 6e 20 28 74 72 |......re|turn (tr| |00002790| 75 65 29 3b 0d 09 09 7d | 0d 09 0d 09 72 65 74 75 |ue);...}|....retu| |000027a0| 72 6e 20 28 66 61 6c 73 | 65 29 3b 0d 09 7d 20 2f |rn (fals|e);..} /| |000027b0| 2a 6e 6f 6f 75 74 6c 69 | 6e 65 65 72 72 6f 72 2a |*nooutli|neerror*| |000027c0| 2f 0d 09 0d 09 0d 73 74 | 61 74 69 63 20 70 61 73 |/.....st|atic pas| |000027d0| 63 61 6c 20 4f 53 45 72 | 72 20 67 65 74 6f 75 74 |cal OSEr|r getout| |000027e0| 6c 69 6e 65 76 65 72 62 | 20 28 41 70 70 6c 65 45 |lineverb| (AppleE| |000027f0| 76 65 6e 74 20 2a 65 76 | 65 6e 74 2c 20 41 70 70 |vent *ev|ent, App| |00002800| 6c 65 45 76 65 6e 74 20 | 2a 72 65 70 6c 79 2c 20 |leEvent |*reply, | |00002810| 6c 6f 6e 67 20 72 65 66 | 63 6f 6e 29 20 7b 0d 09 |long ref|con) {..| |00002820| 0d 09 2f 2a 0d 09 72 65 | 74 75 72 6e 20 74 68 65 |../*..re|turn the| |00002830| 20 6f 75 74 6c 69 6e 65 | 20 74 68 61 74 27 73 20 | outline| that's | |00002840| 72 65 73 69 64 65 6e 74 | 20 69 6e 20 4f 75 74 6c |resident| in Outl| |00002850| 69 6e 65 53 68 61 72 65 | 72 2e 0d 09 2a 2f 0d 0d |ineShare|r...*/..| |00002860| 09 68 64 6c 6f 75 74 6c | 69 6e 65 72 65 63 6f 72 |.hdloutl|inerecor| |00002870| 64 20 68 6f 75 74 6c 69 | 6e 65 3b 0d 09 09 0d 09 |d houtli|ne;.....| |00002880| 69 66 20 28 53 68 61 72 | 65 64 53 63 72 69 70 74 |if (Shar|edScript| |00002890| 43 61 6e 63 65 6c 6c 65 | 64 20 28 65 76 65 6e 74 |Cancelle|d (event| |000028a0| 2c 20 72 65 70 6c 79 29 | 29 20 0d 09 09 72 65 74 |, reply)|) ...ret| |000028b0| 75 72 6e 20 28 6e 6f 45 | 72 72 29 3b 0d 09 0d 09 |urn (noE|rr);....| |000028c0| 49 41 43 67 6c 6f 62 61 | 6c 73 2e 65 76 65 6e 74 |IACgloba|ls.event| |000028d0| 20 3d 20 65 76 65 6e 74 | 3b 0d 09 0d 09 49 41 43 | = event|;....IAC| |000028e0| 67 6c 6f 62 61 6c 73 2e | 72 65 70 6c 79 20 3d 20 |globals.|reply = | |000028f0| 72 65 70 6c 79 3b 0d 09 | 0d 09 69 66 20 28 6e 6f |reply;..|..if (no| |00002900| 6f 75 74 6c 69 6e 65 65 | 72 72 6f 72 20 28 29 29 |outlinee|rror ())| |00002910| 20 0d 09 09 72 65 74 75 | 72 6e 20 28 6e 6f 45 72 | ...retu|rn (noEr| |00002920| 72 29 3b 0d 09 0d 09 49 | 41 43 72 65 74 75 72 6e |r);....I|ACreturn| |00002930| 6f 75 74 6c 69 6e 65 20 | 28 6f 75 74 6c 69 6e 65 |outline |(outline| |00002940| 64 61 74 61 29 3b 0d 09 | 0d 09 72 65 74 75 72 6e |data);..|..return| |00002950| 20 28 6e 6f 45 72 72 29 | 3b 0d 09 7d 20 2f 2a 67 | (noErr)|;..} /*g| |00002960| 65 74 6f 75 74 6c 69 6e | 65 76 65 72 62 2a 2f 0d |etoutlin|everb*/.| |00002970| 09 0d 09 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |....stat|ic void | |00002980| 61 6c 6c 75 70 70 65 72 | 20 28 53 74 72 32 35 35 |allupper| (Str255| |00002990| 20 62 73 29 20 7b 0d 09 | 0d 09 72 65 67 69 73 74 | bs) {..|..regist| |000029a0| 65 72 20 63 68 61 72 20 | 6c 65 6e 20 3d 20 62 73 |er char |len = bs| |000029b0| 20 5b 30 5d 3b 0d 09 72 | 65 67 69 73 74 65 72 20 | [0];..r|egister | |000029c0| 63 68 61 72 20 2a 70 20 | 3d 20 28 63 68 61 72 20 |char *p |= (char | |000029d0| 2a 29 20 26 62 73 20 5b | 31 5d 3b 0d 09 72 65 67 |*) &bs [|1];..reg| |000029e0| 69 73 74 65 72 20 63 68 | 61 72 20 63 68 3b 0d 09 |ister ch|ar ch;..| |000029f0| 0d 09 77 68 69 6c 65 20 | 28 6c 65 6e 2d 2d 29 20 |..while |(len--) | |00002a00| 7b 0d 09 09 0d 09 09 63 | 68 20 3d 20 2a 70 3b 0d |{......c|h = *p;.| |00002a10| 09 09 0d 09 09 69 66 20 | 28 28 63 68 20 3e 3d 20 |.....if |((ch >= | |00002a20| 27 61 27 29 20 26 26 20 | 28 63 68 20 3c 3d 20 27 |'a') && |(ch <= '| |00002a30| 7a 27 29 29 0d 09 09 09 | 2a 70 20 2d 3d 20 33 32 |z'))....|*p -= 32| |00002a40| 3b 0d 09 09 09 0d 09 09 | 70 2b 2b 3b 0d 09 09 7d |;.......|p++;...}| |00002a50| 20 2f 2a 77 68 69 6c 65 | 2a 2f 0d 09 7d 20 2f 2a | /*while|*/..} /*| |00002a60| 61 6c 6c 75 70 70 65 72 | 2a 2f 0d 09 0d 09 0d 73 |allupper|*/.....s| |00002a70| 74 61 74 69 63 20 42 6f | 6f 6c 65 61 6e 20 75 70 |tatic Bo|olean up| |00002a80| 70 65 72 63 61 73 65 76 | 69 73 69 74 20 28 68 64 |percasev|isit (hd| |00002a90| 6c 68 65 61 64 72 65 63 | 6f 72 64 20 68 6e 6f 64 |lheadrec|ord hnod| |00002aa0| 65 29 20 7b 0d 09 0d 09 | 53 74 72 32 35 35 20 62 |e) {....|Str255 b| |00002ab0| 73 3b 0d 09 0d 09 6f 70 | 47 65 74 48 65 61 64 53 |s;....op|GetHeadS| |00002ac0| 74 72 69 6e 67 20 28 68 | 6e 6f 64 65 2c 20 62 73 |tring (h|node, bs| |00002ad0| 29 3b 0d 09 0d 09 61 6c | 6c 75 70 70 65 72 20 28 |);....al|lupper (| |00002ae0| 62 73 29 3b 0d 09 0d 09 | 6f 70 53 65 74 48 65 61 |bs);....|opSetHea| |00002af0| 64 53 74 72 69 6e 67 20 | 28 68 6e 6f 64 65 2c 20 |dString |(hnode, | |00002b00| 62 73 29 3b 0d 09 0d 09 | 72 65 74 75 72 6e 20 28 |bs);....|return (| |00002b10| 74 72 75 65 29 3b 0d 09 | 7d 20 2f 2a 75 70 70 65 |true);..|} /*uppe| |00002b20| 72 63 61 73 65 76 69 73 | 69 74 2a 2f 0d 09 0d 09 |rcasevis|it*/....| |00002b30| 0d 73 74 61 74 69 63 20 | 70 61 73 63 61 6c 20 4f |.static |pascal O| |00002b40| 53 45 72 72 20 75 70 70 | 65 72 63 61 73 65 6f 75 |SErr upp|ercaseou| |00002b50| 74 6c 69 6e 65 76 65 72 | 62 20 28 41 70 70 6c 65 |tlinever|b (Apple| |00002b60| 45 76 65 6e 74 20 2a 65 | 76 65 6e 74 2c 20 41 70 |Event *e|vent, Ap| |00002b70| 70 6c 65 45 76 65 6e 74 | 20 2a 72 65 70 6c 79 2c |pleEvent| *reply,| |00002b80| 20 6c 6f 6e 67 20 72 65 | 66 63 6f 6e 29 20 7b 0d | long re|fcon) {.| |00002b90| 0d 09 2f 2a 0d 09 63 6f | 6e 76 65 72 74 20 61 6c |../*..co|nvert al| |00002ba0| 6c 20 74 68 65 20 63 68 | 61 72 61 63 74 65 72 73 |l the ch|aracters| |00002bb0| 20 69 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | in the |current | |00002bc0| 6f 75 74 6c 69 6e 65 20 | 74 6f 20 6c 6f 77 65 72 |outline |to lower| |00002bd0| 63 61 73 65 2e 0d 09 2a | 2f 0d 0d 09 68 64 6c 6f |case...*|/...hdlo| |00002be0| 75 74 6c 69 6e 65 72 65 | 63 6f 72 64 20 68 6f 75 |utlinere|cord hou| |00002bf0| 74 6c 69 6e 65 3b 0d 09 | 09 0d 09 69 66 20 28 53 |tline;..|...if (S| |00002c00| 68 61 72 65 64 53 63 72 | 69 70 74 43 61 6e 63 65 |haredScr|iptCance| |00002c10| 6c 6c 65 64 20 28 65 76 | 65 6e 74 2c 20 72 65 70 |lled (ev|ent, rep| |00002c20| 6c 79 29 29 20 2f 2a 70 | 61 72 74 20 6f 66 20 74 |ly)) /*p|art of t| |00002c30| 68 65 20 6d 65 6e 75 20 | 73 68 61 72 69 6e 67 20 |he menu |sharing | |00002c40| 70 72 6f 74 6f 63 6f 6c | 2a 2f 0d 09 09 72 65 74 |protocol|*/...ret| |00002c50| 75 72 6e 20 28 6e 6f 45 | 72 72 29 3b 0d 09 0d 09 |urn (noE|rr);....| |00002c60| 49 41 43 67 6c 6f 62 61 | 6c 73 2e 65 76 65 6e 74 |IACgloba|ls.event| |00002c70| 20 3d 20 65 76 65 6e 74 | 3b 0d 09 0d 09 49 41 43 | = event|;....IAC| |00002c80| 67 6c 6f 62 61 6c 73 2e | 72 65 70 6c 79 20 3d 20 |globals.|reply = | |00002c90| 72 65 70 6c 79 3b 0d 09 | 0d 09 69 66 20 28 6e 6f |reply;..|..if (no| |00002ca0| 6f 75 74 6c 69 6e 65 65 | 72 72 6f 72 20 28 29 29 |outlinee|rror ())| |00002cb0| 20 2f 2a 6e 6f 20 6f 75 | 74 6c 69 6e 65 20 74 6f | /*no ou|tline to| |00002cc0| 20 75 70 70 65 72 63 61 | 73 65 2a 2f 0d 09 09 72 | upperca|se*/...r| |00002cd0| 65 74 75 72 6e 20 28 6e | 6f 45 72 72 29 3b 0d 09 |eturn (n|oErr);..| |00002ce0| 0d 09 6f 70 56 69 73 69 | 74 4f 75 74 6c 69 6e 65 |..opVisi|tOutline| |00002cf0| 20 28 75 70 70 65 72 63 | 61 73 65 76 69 73 69 74 | (upperc|asevisit| |00002d00| 29 3b 20 2f 2a 76 69 73 | 69 74 20 65 76 65 72 79 |); /*vis|it every| |00002d10| 20 6e 6f 64 65 20 69 6e | 20 74 68 65 20 6f 75 74 | node in| the out| |00002d20| 6c 69 6e 65 2a 2f 0d 09 | 0d 09 49 41 43 72 65 74 |line*/..|..IACret| |00002d30| 75 72 6e 62 6f 6f 6c 65 | 61 6e 20 28 74 72 75 65 |urnboole|an (true| |00002d40| 29 3b 0d 09 0d 09 72 65 | 74 75 72 6e 20 28 6e 6f |);....re|turn (no| |00002d50| 45 72 72 29 3b 0d 09 7d | 20 2f 2a 75 70 70 65 72 |Err);..}| /*upper| |00002d60| 63 61 73 65 6f 75 74 6c | 69 6e 65 76 65 72 62 2a |caseoutl|ineverb*| |00002d70| 2f 0d 09 0d 09 0d 73 74 | 61 74 69 63 20 76 6f 69 |/.....st|atic voi| |00002d80| 64 20 61 6c 6c 6c 6f 77 | 65 72 20 28 53 74 72 32 |d alllow|er (Str2| |00002d90| 35 35 20 62 73 29 20 7b | 0d 09 0d 09 72 65 67 69 |55 bs) {|....regi| |00002da0| 73 74 65 72 20 63 68 61 | 72 20 6c 65 6e 20 3d 20 |ster cha|r len = | |00002db0| 62 73 20 5b 30 5d 3b 0d | 09 72 65 67 69 73 74 65 |bs [0];.|.registe| |00002dc0| 72 20 63 68 61 72 20 2a | 70 20 3d 20 28 63 68 61 |r char *|p = (cha| |00002dd0| 72 20 2a 29 20 26 62 73 | 20 5b 31 5d 3b 0d 09 72 |r *) &bs| [1];..r| |00002de0| 65 67 69 73 74 65 72 20 | 63 68 61 72 20 63 68 3b |egister |char ch;| |00002df0| 0d 09 0d 09 77 68 69 6c | 65 20 28 6c 65 6e 2d 2d |....whil|e (len--| |00002e00| 29 20 7b 0d 09 09 0d 09 | 09 63 68 20 3d 20 2a 70 |) {.....|.ch = *p| |00002e10| 3b 0d 09 09 0d 09 09 69 | 66 20 28 28 63 68 20 3e |;......i|f ((ch >| |00002e20| 3d 20 27 41 27 29 20 26 | 26 20 28 63 68 20 3c 3d |= 'A') &|& (ch <=| |00002e30| 20 27 5a 27 29 29 0d 09 | 09 09 2a 70 20 2b 3d 20 | 'Z'))..|..*p += | |00002e40| 33 32 3b 0d 09 09 09 0d | 09 09 70 2b 2b 3b 0d 09 |32;.....|..p++;..| |00002e50| 09 7d 20 2f 2a 77 68 69 | 6c 65 2a 2f 0d 09 7d 20 |.} /*whi|le*/..} | |00002e60| 2f 2a 61 6c 6c 6c 6f 77 | 65 72 2a 2f 0d 09 0d 09 |/*alllow|er*/....| |00002e70| 0d 73 74 61 74 69 63 20 | 42 6f 6f 6c 65 61 6e 20 |.static |Boolean | |00002e80| 6c 6f 77 65 72 63 61 73 | 65 76 69 73 69 74 20 28 |lowercas|evisit (| |00002e90| 68 64 6c 68 65 61 64 72 | 65 63 6f 72 64 20 68 6e |hdlheadr|ecord hn| |00002ea0| 6f 64 65 29 20 7b 0d 09 | 0d 09 53 74 72 32 35 35 |ode) {..|..Str255| |00002eb0| 20 62 73 3b 0d 09 0d 09 | 6f 70 47 65 74 48 65 61 | bs;....|opGetHea| |00002ec0| 64 53 74 72 69 6e 67 20 | 28 68 6e 6f 64 65 2c 20 |dString |(hnode, | |00002ed0| 62 73 29 3b 0d 09 0d 09 | 61 6c 6c 6c 6f 77 65 72 |bs);....|alllower| |00002ee0| 20 28 62 73 29 3b 0d 09 | 0d 09 6f 70 53 65 74 48 | (bs);..|..opSetH| |00002ef0| 65 61 64 53 74 72 69 6e | 67 20 28 68 6e 6f 64 65 |eadStrin|g (hnode| |00002f00| 2c 20 62 73 29 3b 0d 09 | 0d 09 72 65 74 75 72 6e |, bs);..|..return| |00002f10| 20 28 74 72 75 65 29 3b | 0d 09 7d 20 2f 2a 6c 6f | (true);|..} /*lo| |00002f20| 77 65 72 63 61 73 65 76 | 69 73 69 74 2a 2f 0d 09 |wercasev|isit*/..| |00002f30| 0d 09 0d 73 74 61 74 69 | 63 20 70 61 73 63 61 6c |...stati|c pascal| |00002f40| 20 4f 53 45 72 72 20 6c | 6f 77 65 72 63 61 73 65 | OSErr l|owercase| |00002f50| 6f 75 74 6c 69 6e 65 76 | 65 72 62 20 28 41 70 70 |outlinev|erb (App| |00002f60| 6c 65 45 76 65 6e 74 20 | 2a 65 76 65 6e 74 2c 20 |leEvent |*event, | |00002f70| 41 70 70 6c 65 45 76 65 | 6e 74 20 2a 72 65 70 6c |AppleEve|nt *repl| |00002f80| 79 2c 20 6c 6f 6e 67 20 | 72 65 66 63 6f 6e 29 20 |y, long |refcon) | |00002f90| 7b 0d 09 0d 09 2f 2a 0d | 09 63 6f 6e 76 65 72 74 |{..../*.|.convert| |00002fa0| 20 61 6c 6c 20 74 68 65 | 20 63 68 61 72 61 63 74 | all the| charact| |00002fb0| 65 72 73 20 69 6e 20 74 | 68 65 20 63 75 72 72 65 |ers in t|he curre| |00002fc0| 6e 74 20 6f 75 74 6c 69 | 6e 65 20 74 6f 20 6c 6f |nt outli|ne to lo| |00002fd0| 77 65 72 63 61 73 65 2e | 0d 09 2a 2f 0d 0d 09 68 |wercase.|..*/...h| |00002fe0| 64 6c 6f 75 74 6c 69 6e | 65 72 65 63 6f 72 64 20 |dloutlin|erecord | |00002ff0| 68 6f 75 74 6c 69 6e 65 | 3b 0d 09 09 0d 09 69 66 |houtline|;.....if| |00003000| 20 28 53 68 61 72 65 64 | 53 63 72 69 70 74 43 61 | (Shared|ScriptCa| |00003010| 6e 63 65 6c 6c 65 64 20 | 28 65 76 65 6e 74 2c 20 |ncelled |(event, | |00003020| 72 65 70 6c 79 29 29 20 | 2f 2a 70 61 72 74 20 6f |reply)) |/*part o| |00003030| 66 20 74 68 65 20 6d 65 | 6e 75 20 73 68 61 72 69 |f the me|nu shari| |00003040| 6e 67 20 70 72 6f 74 6f | 63 6f 6c 2a 2f 0d 09 09 |ng proto|col*/...| |00003050| 72 65 74 75 72 6e 20 28 | 6e 6f 45 72 72 29 3b 0d |return (|noErr);.| |00003060| 09 0d 09 49 41 43 67 6c | 6f 62 61 6c 73 2e 65 76 |...IACgl|obals.ev| |00003070| 65 6e 74 20 3d 20 65 76 | 65 6e 74 3b 0d 09 0d 09 |ent = ev|ent;....| |00003080| 49 41 43 67 6c 6f 62 61 | 6c 73 2e 72 65 70 6c 79 |IACgloba|ls.reply| |00003090| 20 3d 20 72 65 70 6c 79 | 3b 0d 09 0d 09 69 66 20 | = reply|;....if | |000030a0| 28 6e 6f 6f 75 74 6c 69 | 6e 65 65 72 72 6f 72 20 |(nooutli|neerror | |000030b0| 28 29 29 20 2f 2a 6e 6f | 20 6f 75 74 6c 69 6e 65 |()) /*no| outline| |000030c0| 20 74 6f 20 6c 6f 77 65 | 72 63 61 73 65 2a 2f 0d | to lowe|rcase*/.| |000030d0| 09 09 72 65 74 75 72 6e | 20 28 6e 6f 45 72 72 29 |..return| (noErr)| |000030e0| 3b 0d 09 09 0d 09 6f 70 | 56 69 73 69 74 4f 75 74 |;.....op|VisitOut| |000030f0| 6c 69 6e 65 20 28 6c 6f | 77 65 72 63 61 73 65 76 |line (lo|wercasev| |00003100| 69 73 69 74 29 3b 20 2f | 2a 76 69 73 69 74 20 65 |isit); /|*visit e| |00003110| 76 65 72 79 20 6e 6f 64 | 65 20 69 6e 20 74 68 65 |very nod|e in the| |00003120| 20 6f 75 74 6c 69 6e 65 | 2a 2f 0d 09 0d 09 49 41 | outline|*/....IA| |00003130| 43 72 65 74 75 72 6e 62 | 6f 6f 6c 65 61 6e 20 28 |Creturnb|oolean (| |00003140| 74 72 75 65 29 3b 0d 09 | 0d 09 72 65 74 75 72 6e |true);..|..return| |00003150| 20 28 6e 6f 45 72 72 29 | 3b 0d 09 7d 20 2f 2a 6c | (noErr)|;..} /*l| |00003160| 6f 77 65 72 63 61 73 65 | 6f 75 74 6c 69 6e 65 76 |owercase|outlinev| |00003170| 65 72 62 2a 2f 0d 09 0d | 09 0d 76 6f 69 64 20 6d |erb*/...|..void m| |00003180| 61 69 6e 20 28 76 6f 69 | 64 29 20 7b 0d 09 0d 09 |ain (voi|d) {....| |00003190| 69 6e 69 74 6d 61 63 69 | 6e 74 6f 73 68 20 28 29 |initmaci|ntosh ()| |000031a0| 3b 0d 09 0d 09 69 66 20 | 28 21 49 6e 69 74 53 68 |;....if |(!InitSh| |000031b0| 61 72 65 64 4d 65 6e 75 | 73 20 28 29 29 0d 09 09 |aredMenu|s ())...| |000031c0| 67 6f 74 6f 20 65 72 72 | 6f 72 3b 0d 09 0d 09 69 |goto err|or;....i| |000031d0| 66 20 28 21 49 41 43 69 | 6e 73 74 61 6c 6c 68 61 |f (!IACi|nstallha| |000031e0| 6e 64 6c 65 72 20 28 27 | 4f 55 54 53 27 2c 20 27 |ndler ('|OUTS', '| |000031f0| 73 6d 73 67 27 2c 20 28 | 50 72 6f 63 50 74 72 29 |smsg', (|ProcPtr)| |00003200| 20 73 65 74 6d 65 73 73 | 61 67 65 76 65 72 62 29 | setmess|ageverb)| |00003210| 29 0d 09 09 67 6f 74 6f | 20 65 72 72 6f 72 3b 0d |)...goto| error;.| |00003220| 09 0d 09 69 66 20 28 21 | 49 41 43 69 6e 73 74 61 |...if (!|IACinsta| |00003230| 6c 6c 73 79 73 74 65 6d | 68 61 6e 64 6c 65 72 20 |llsystem|handler | |00003240| 28 27 6f 75 74 73 27 2c | 20 27 73 6f 75 74 27 2c |('outs',| 'sout',| |00003250| 20 28 50 72 6f 63 50 74 | 72 29 20 73 65 74 6f 75 | (ProcPt|r) setou| |00003260| 74 6c 69 6e 65 76 65 72 | 62 29 29 0d 09 09 67 6f |tlinever|b))...go| |00003270| 74 6f 20 65 72 72 6f 72 | 3b 0d 09 0d 09 69 66 20 |to error|;....if | |00003280| 28 21 49 41 43 69 6e 73 | 74 61 6c 6c 73 79 73 74 |(!IACins|tallsyst| |00003290| 65 6d 68 61 6e 64 6c 65 | 72 20 28 27 6f 75 74 73 |emhandle|r ('outs| |000032a0| 27 2c 20 27 67 6f 75 74 | 27 2c 20 28 50 72 6f 63 |', 'gout|', (Proc| |000032b0| 50 74 72 29 20 67 65 74 | 6f 75 74 6c 69 6e 65 76 |Ptr) get|outlinev| |000032c0| 65 72 62 29 29 0d 09 09 | 67 6f 74 6f 20 65 72 72 |erb))...|goto err| |000032d0| 6f 72 3b 0d 09 0d 09 69 | 66 20 28 21 49 41 43 69 |or;....i|f (!IACi| |000032e0| 6e 73 74 61 6c 6c 73 79 | 73 74 65 6d 68 61 6e 64 |nstallsy|stemhand| |000032f0| 6c 65 72 20 28 27 6f 75 | 74 73 27 2c 20 27 6c 63 |ler ('ou|ts', 'lc| |00003300| 61 73 27 2c 20 28 50 72 | 6f 63 50 74 72 29 20 6c |as', (Pr|ocPtr) l| |00003310| 6f 77 65 72 63 61 73 65 | 6f 75 74 6c 69 6e 65 76 |owercase|outlinev| |00003320| 65 72 62 29 29 0d 09 09 | 67 6f 74 6f 20 65 72 72 |erb))...|goto err| |00003330| 6f 72 3b 0d 09 0d 09 69 | 66 20 28 21 49 41 43 69 |or;....i|f (!IACi| |00003340| 6e 73 74 61 6c 6c 73 79 | 73 74 65 6d 68 61 6e 64 |nstallsy|stemhand| |00003350| 6c 65 72 20 28 27 6f 75 | 74 73 27 2c 20 27 75 63 |ler ('ou|ts', 'uc| |00003360| 61 73 27 2c 20 28 50 72 | 6f 63 50 74 72 29 20 75 |as', (Pr|ocPtr) u| |00003370| 70 70 65 72 63 61 73 65 | 6f 75 74 6c 69 6e 65 76 |ppercase|outlinev| |00003380| 65 72 62 29 29 0d 09 09 | 67 6f 74 6f 20 65 72 72 |erb))...|goto err| |00003390| 6f 72 3b 0d 09 0d 09 69 | 66 20 28 21 49 41 43 69 |or;....i|f (!IACi| |000033a0| 6e 73 74 61 6c 6c 68 61 | 6e 64 6c 65 72 20 28 6b |nstallha|ndler (k| |000033b0| 43 6f 72 65 45 76 65 6e | 74 43 6c 61 73 73 2c 20 |CoreEven|tClass, | |000033c0| 6b 41 45 4f 70 65 6e 41 | 70 70 6c 69 63 61 74 69 |kAEOpenA|pplicati| |000033d0| 6f 6e 2c 20 28 50 72 6f | 63 50 74 72 29 20 26 68 |on, (Pro|cPtr) &h| |000033e0| 61 6e 64 6c 65 6f 70 65 | 6e 61 70 70 29 29 0d 09 |andleope|napp))..| |000033f0| 09 67 6f 74 6f 20 65 72 | 72 6f 72 3b 0d 09 0d 09 |.goto er|ror;....| |00003400| 69 66 20 28 21 49 41 43 | 69 6e 73 74 61 6c 6c 68 |if (!IAC|installh| |00003410| 61 6e 64 6c 65 72 20 28 | 6b 43 6f 72 65 45 76 65 |andler (|kCoreEve| |00003420| 6e 74 43 6c 61 73 73 2c | 20 6b 41 45 4f 70 65 6e |ntClass,| kAEOpen| |00003430| 44 6f 63 75 6d 65 6e 74 | 73 2c 20 28 50 72 6f 63 |Document|s, (Proc| |00003440| 50 74 72 29 20 26 68 61 | 6e 64 6c 65 6f 70 65 6e |Ptr) &ha|ndleopen| |00003450| 29 29 0d 09 09 67 6f 74 | 6f 20 65 72 72 6f 72 3b |))...got|o error;| |00003460| 0d 09 0d 09 69 66 20 28 | 21 49 41 43 69 6e 73 74 |....if (|!IACinst| |00003470| 61 6c 6c 68 61 6e 64 6c | 65 72 20 28 6b 43 6f 72 |allhandl|er (kCor| |00003480| 65 45 76 65 6e 74 43 6c | 61 73 73 2c 20 6b 41 45 |eEventCl|ass, kAE| |00003490| 50 72 69 6e 74 44 6f 63 | 75 6d 65 6e 74 73 2c 20 |PrintDoc|uments, | |000034a0| 28 50 72 6f 63 50 74 72 | 29 20 26 68 61 6e 64 6c |(ProcPtr|) &handl| |000034b0| 65 70 72 69 6e 74 29 29 | 0d 09 09 67 6f 74 6f 20 |eprint))|...goto | |000034c0| 65 72 72 6f 72 3b 0d 09 | 0d 09 69 66 20 28 21 49 |error;..|..if (!I| |000034d0| 41 43 69 6e 73 74 61 6c | 6c 68 61 6e 64 6c 65 72 |ACinstal|lhandler| |000034e0| 20 28 6b 43 6f 72 65 45 | 76 65 6e 74 43 6c 61 73 | (kCoreE|ventClas| |000034f0| 73 2c 20 6b 41 45 51 75 | 69 74 41 70 70 6c 69 63 |s, kAEQu|itApplic| |00003500| 61 74 69 6f 6e 2c 20 28 | 50 72 6f 63 50 74 72 29 |ation, (|ProcPtr)| |00003510| 20 26 68 61 6e 64 6c 65 | 71 75 69 74 29 29 0d 09 | &handle|quit))..| |00003520| 09 67 6f 74 6f 20 65 72 | 72 6f 72 3b 0d 0d 09 69 |.goto er|ror;...i| |00003530| 6e 69 74 6d 65 6e 75 73 | 20 28 29 3b 0d 09 0d 09 |nitmenus| ();....| |00003540| 69 6e 69 74 6d 61 69 6e | 77 69 6e 64 6f 77 20 28 |initmain|window (| |00003550| 29 3b 0d 09 0d 09 6d 61 | 69 6e 65 76 65 6e 74 6c |);....ma|ineventl| |00003560| 6f 6f 70 20 28 29 3b 0d | 09 09 0d 09 45 78 69 74 |oop ();.|....Exit| |00003570| 54 6f 53 68 65 6c 6c 20 | 28 29 3b 0d 09 0d 09 65 |ToShell |();....e| |00003580| 72 72 6f 72 3a 0d 09 0d | 09 41 6c 65 72 74 20 28 |rror:...|.Alert (| |00003590| 32 36 31 2c 20 6e 69 6c | 29 3b 20 2f 2a 74 68 69 |261, nil|); /*thi| |000035a0| 73 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 72 65 |s applic|ation re| |000035b0| 71 75 69 72 65 73 20 73 | 79 73 74 65 6d 20 37 2e |quires s|ystem 7.| |000035c0| 30 20 6f 72 20 68 69 67 | 68 65 72 2a 2f 0d 09 09 |0 or hig|her*/...| |000035d0| 0d 09 45 78 69 74 54 6f | 53 68 65 6c 6c 20 28 29 |..ExitTo|Shell ()| |000035e0| 3b 0d 09 7d 20 2f 2a 6d | 61 69 6e 2a 2f 0d 0d 0d |;..} /*m|ain*/...| |000035f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00003600| 00 00 01 00 00 00 01 36 | 00 00 00 36 00 00 00 1e |.......6|...6....| |00003610| 50 01 01 a2 51 02 20 ad | f9 f2 51 fc 02 00 44 26 |P...Q. .|..Q...D&| |00003620| 4b 51 03 20 2d fe 10 20 | 80 67 bb 55 01 2d 4b 16 |KQ. -.. |.g.U.-K.| |00003630| 06 6d 61 69 6e 2e 63 b4 | 02 00 00 00 50 61 72 74 |.main.c.|....Part| |00003640| 53 49 54 78 00 00 00 00 | 00 00 00 00 00 01 81 ca |SITx....|........| |00003650| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......| |00003660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00003670| 00 00 a9 81 44 c2 00 00 | 00 00 00 00 01 54 5f 02 |....D...|.....T_.| |00003680| 4a 2d f6 bf 67 01 67 2c | 98 52 59 54 13 48 68 00 |J-..g.g,|.RYT.Hh.| |00003690| 02 48 7a 01 00 72 25 59 | 54 17 3f 10 72 ff 2f 01 |.Hz..r%Y|T.?.r./.| |000036a0| 70 01 1f 00 2f 2e 00 0c | 03 aa 45 28 5f 60 2a 98 |p.../...|..E(_`*.| |000036b0| 52 59 54 20 0f 01 00 46 | 25 59 54 20 10 01 a9 13 |RYT ...F|%YT ....| |000036c0| 28 5f 01 a0 1b 8d 04 66 | 0e 20 4b a0 1f 70 94 56 |(_.....f|. K..p.V| |000036d0| 50 01 01 da 67 01 39 7c | 71 01 00 6c 8d 2b 79 65 |P...g.9||q..l.+ye| |000036e0| 4e 4b 63 01 ff c4 41 42 | 55 30 76 5b 57 12 ff c4 |NKc...AB|U0v[W...| |000036f0| 4e ad 48 67 01 67 5e 31 | 32 c6 33 30 3b 6d d8 7f |N.Hg.g^1|2.30;m..| |00003700| 00 00 00 2f 02 00 80 00 | 00 00 06 32 2e 30 72 63 |.../....|...2.0rc| |00003710| 31 21 32 2e 30 72 63 31 | 3b 20 a9 20 31 39 39 32 |1!2.0rc1|; . 1992| |00003720| 2c 20 55 73 65 72 4c 61 | 6e 64 20 53 6f 66 74 77 |, UserLa|nd Softw| |00003730| 61 72 65 65 72 65 00 00 | 01 00 00 00 01 36 00 00 |areere..|.....6..| |00003740| 00 36 00 00 00 1e 00 ed | cb 18 0d 98 00 00 00 1c |.6......|........| |00003750| 00 1e ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00003760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00003770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| +--------+-------------------------+-------------------------+--------+--------+